c#執(zhí)行excel宏模版的方法
在項(xiàng)目中如果涉及到用Excel開(kāi)發(fā)的報(bào)表模版來(lái)導(dǎo)出報(bào)表數(shù)據(jù)的話,一般都是在Excel報(bào)表中使用VBA做成宏來(lái)進(jìn)行調(diào)用。即先使用Excel自帶的VBA開(kāi)發(fā)好報(bào)表模版,然后再將模版程序放在固定目錄下,在管理軟件中對(duì)這些報(bào)表模版進(jìn)行調(diào)用。這樣就不需要使用其它報(bào)表工具來(lái)進(jìn)行開(kāi)發(fā)了,因?yàn)镋xcel功能比較強(qiáng)大,一般的應(yīng)用的報(bào)表用它來(lái)開(kāi)發(fā)綽綽有余了。而且這樣開(kāi)發(fā)的成本也很低,不需要再購(gòu)買其它專業(yè)的報(bào)表開(kāi)發(fā)軟件直接使用Office開(kāi)發(fā)即可。使用Excel開(kāi)發(fā)的宏模版當(dāng)然要使用上層程序來(lái)調(diào)用宏模版了。我以前在工作中就開(kāi)發(fā)過(guò)Excel模版,并使用C#程序調(diào)用過(guò)這些模版程序。規(guī)則是首先將報(bào)表需要的數(shù)據(jù)填沖到DataTable或者DataSet中,然后將DataTable或者DataSet中數(shù)據(jù)導(dǎo)出Excel中。
現(xiàn)提供導(dǎo)出Excel模版的代碼如下:
namespace ExcelTest
{
public class ExelTemplate
{
private static Excel.Application ExcelApp;//Define a Excel Application object
private static Excel._Workbook ExcelWB;//define a Excel workbook object
private static Excel._Worksheet ExcelWS;//define a Excel workbook worksheet
//將報(bào)表所需的主數(shù)據(jù)放入dtHeader,明細(xì)數(shù)據(jù)放入dtDetail中,調(diào)用的模版名稱為strTemplateFileName,導(dǎo)出的報(bào)表名稱為strOutFileName
public static bool FillContent(string strTemplateFileName, string strOutFileName, System.Data.DataTable dtHeader, System.Data.DataTable dtDetail)
{
bool flag = true;
FileInfo fileInfo = new FileInfo(strTemplateFileName);
System.Globalization.CultureInfo CurrentCI = System.Threading.Thread.CurrentThread.CurrentCulture;
System.Threading.Thread.CurrentThread.CurrentCulture = new System.Globalization.CultureInfo("en-US");
try
{
//Start Excel and get Application object.
ExcelApp = new Excel.Application();
ExcelApp.Visible = false;
//Get a new workbook.
ExcelWB = (Excel._Workbook)(ExcelApp.Workbooks.Add(strTemplateFileName));
//Fill content.注意這里的Header和Detail分別對(duì)應(yīng)模版文件中的Header和Detail兩個(gè)Sheet頁(yè),這2個(gè)Sheet是專門用來(lái)存放明主數(shù)據(jù)或者明細(xì)數(shù)據(jù)的。
if (!FillWorksheet("Header", dtHeader)) return false;
if (!FillWorksheet("Detail", dtDetail)) return false;
//Run macro.
ExcelApp.Run("SetData", Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
ExcelApp.DisplayAlerts = false;
//=========================================================================================================
//Delete Header and Detail.
//((Excel._Worksheet)ExcelWB.Sheets["Header Information"]).Delete();
//((Excel._Worksheet)ExcelWB.Sheets["Detail Information"]).Delete();
//=========================================================================================================
ExcelApp.DisplayAlerts = true;
//Delete old file.
File.Delete(strOutFileName);
//Save excel file.
ExcelWB.SaveAs(strOutFileName, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, XlSaveAsAccessMode.xlExclusive, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
// Quit Excel.
ExcelWB.Close(false, strOutFileName, Missing.Value);//*******************
MarshalReleaseComObject(ExcelWB);
ExcelApp.Quit();
//Kill excel application.
//KillProcess("EXCEL");//******************
}
catch (Exception ex)
{
throw ex;
flag = false;
}
finally
{
MarshalReleaseComObject(ExcelApp);
GC.Collect();
}
return flag;
}
//將報(bào)表所需的主數(shù)據(jù)放入dtHeader,明細(xì)數(shù)據(jù)放入dtDetail中,調(diào)用的模版名稱為strTemplateFileName,導(dǎo)出的報(bào)表名稱為strOutFileName
public static bool FillContent(string strTemplateFileName, string strOutFileName, System.Data.DataSet dsdata)
{
bool flag = true;
FileInfo fileInfo = new FileInfo(strTemplateFileName);
System.Globalization.CultureInfo CurrentCI = System.Threading.Thread.CurrentThread.CurrentCulture;
System.Threading.Thread.CurrentThread.CurrentCulture = new System.Globalization.CultureInfo("en-US");
try
{
//Start Excel and get Application object.
ExcelApp = new Excel.Application();
ExcelApp.Visible = false;
//Get a new workbook.
ExcelWB = (Excel._Workbook)(ExcelApp.Workbooks.Add(strTemplateFileName));
//Fill content.
//if (!FillWorksheet("Header", dtHeader)) return false;
//if (!FillWorksheet("Detail", dtDetail)) return false;
//Fill content.注意這里的沒(méi)有寫明對(duì)應(yīng)模版文件中Sheet頁(yè),但是指定了dsdata.Tables[i].TableName為Sheet頁(yè)的名字,這樣方便靈活設(shè)置,而且這樣可以有多個(gè)Sheet是專門用來(lái)存放明主數(shù)據(jù)或者明細(xì)數(shù)據(jù)的。
for (int i = 0; i < dsdata.Tables.Count; i++)
{
if (!FillWorksheet(dsdata.Tables[i].TableName, dsdata.Tables[i]))
return false;
}
//Run macro.
ExcelApp.Run("SetData", Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
ExcelApp.DisplayAlerts = false;
//=========================================================================================================
//Delete Header and Detail.
//((Excel._Worksheet)ExcelWB.Sheets["Header Information"]).Delete();
//((Excel._Worksheet)ExcelWB.Sheets["Detail Information"]).Delete();
//=========================================================================================================
ExcelApp.DisplayAlerts = true;
//Delete old file.
File.Delete(strOutFileName);
//Save excel file.
ExcelWB.SaveAs(strOutFileName, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value, XlSaveAsAccessMode.xlExclusive, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);
// Quit Excel.
ExcelWB.Close(false, strOutFileName, Missing.Value);//*******************
MarshalReleaseComObject(ExcelWB);
ExcelApp.Quit();
}
catch (Exception ex)
{
throw ex;
flag = false;
}
finally
{
MarshalReleaseComObject(ExcelApp);
GC.Collect();
}
return flag;
}
//使用Excel來(lái)導(dǎo)出報(bào)表時(shí),在服務(wù)器上的Excel進(jìn)程容易死掉,導(dǎo)致資源無(wú)法釋放,因此需要使用這個(gè)方法來(lái)釋放死掉的進(jìn)程
private static void MarshalReleaseComObject(object objCom)
{
try
{
int i = 1;
if (objCom != null && System.Runtime.InteropServices.Marshal.IsComObject(objCom))
{
do
{
i = System.Runtime.InteropServices.Marshal.ReleaseComObject(objCom);
} while (i > 0);
}
}
finally
{
objCom = null;
}
}
}
- OpenXml讀寫Excel實(shí)例代碼
- C#基于NPOI生成具有精確列寬行高的Excel文件的方法
- C#實(shí)現(xiàn)Excel導(dǎo)入sqlite的方法
- C#將Sql數(shù)據(jù)保存到Excel文件中的方法
- C#利用XML創(chuàng)建Excel文檔的實(shí)現(xiàn)方法
- c#連接excel示例分享
- c#讀寫excel文件使用示例
- word ppt excel文檔轉(zhuǎn)換成pdf的C#實(shí)現(xiàn)代碼
- c#生成excel示例sql數(shù)據(jù)庫(kù)導(dǎo)出excel
- c#將Excel數(shù)據(jù)導(dǎo)入到數(shù)據(jù)庫(kù)的實(shí)現(xiàn)代碼
- C# WinForm導(dǎo)出Excel方法介紹
- c#利用Excel直接讀取數(shù)據(jù)到DataGridView
- C#利用Openxml讀取Excel數(shù)據(jù)實(shí)例
相關(guān)文章
Datagridview使用技巧(9)Datagridview的右鍵菜單
這篇文章主要為大家詳細(xì)介紹了Datagridview使用技巧,Datagridview的右鍵菜單,具有一定的參考價(jià)值,感興趣的小伙伴們可以參考一下2017-05-05
C#使用FileInfo和DirectoryInfo類來(lái)執(zhí)行文件和文件夾操作
System.IO.FileInfo?和?System.IO.DirectoryInfo?是C#中用于操作文件和文件夾的類,它們提供了許多有用的方法和屬性來(lái)管理文件和文件夾,這篇文章主要介紹了C#使用FileInfo和DirectoryInfo類來(lái)執(zhí)行文件和文件夾操作,需要的朋友可以參考下2023-08-08
C#編程中使用ref和out關(guān)鍵字來(lái)傳遞數(shù)組對(duì)象的用法
這篇文章主要介紹了C#編程中使用ref和out關(guān)鍵字來(lái)傳遞數(shù)組對(duì)象的用法,在C#中數(shù)組也是對(duì)象可以被傳遞,需要的朋友可以參考下2016-01-01
C#實(shí)現(xiàn)圖書(shū)管理系統(tǒng)
這篇文章主要為大家詳細(xì)介紹了C#實(shí)現(xiàn)圖書(shū)管理系統(tǒng),文中示例代碼介紹的非常詳細(xì),具有一定的參考價(jià)值,感興趣的小伙伴們可以參考一下2022-02-02
c# 實(shí)現(xiàn)網(wǎng)頁(yè)加載后將頁(yè)面截取為長(zhǎng)圖片
這篇文章主要介紹了c# 實(shí)現(xiàn)網(wǎng)頁(yè)加載后將頁(yè)面截取為長(zhǎng)圖片的方法,幫助大家更好的理解和學(xué)習(xí)c#,感興趣的朋友可以了解下2021-01-01
在C#的類或結(jié)構(gòu)中重寫ToString方法的用法簡(jiǎn)介
這篇文章主要介紹了在C#的類或結(jié)構(gòu)中重寫ToString方法的用法簡(jiǎn)介,需要的朋友可以參考下2016-01-01
Unity 通過(guò)LineRenderer繪制兩點(diǎn)之間的直線操作
這篇文章主要介紹了Unity 通過(guò)LineRenderer繪制兩點(diǎn)之間的直線操作,具有很好的參考價(jià)值,希望對(duì)大家有所幫助。一起跟隨小編過(guò)來(lái)看看吧2021-04-04

