使用C#開啟含有巨集的excel檔後,執行巨集
try
{
ExcelMacroHelper excelMacroHelper = new ExcelMacroHelper();
// 返回對象
object objRtn = new object();
excelMacroHelper.RunExcelMacro(saveFileDialog1.FileName, "OrCAD整理", new Object[] { "OrCAD整理" }, out objRtn, true);
}
catch (Exception ex)
{
MessageBox.Show(ex.Message);
}
class ExcelMacroHelper
{
/// <summary>
/// 執行Excel中的宏
/// </summary>
/// <param name="excelFilePath">Excel文檔路徑</param>
/// <param name="macroName">宏名稱</param>
/// <param name="parameters">宏參數組</param>
/// <param name="rtnValue">宏返回值</param>
/// <param name="isShowExcel">執行時是否顯示Excel</param>
public void RunExcelMacro(
string excelFilePath,
string macroName,
object[] parameters,
out object rtnValue,
bool isShowExcel
)
{
#region 檢查入參
// 檢查文檔是否存在
if (!File.Exists(excelFilePath))
{
throw new System.Exception(excelFilePath + " 文檔不存在");
}
// 檢查是否輸入宏名稱
if (string.IsNullOrEmpty(macroName))
{
throw new System.Exception("請輸入宏的名稱");
}
#endregion
#region 宏參數對象
// 準備打開Excel文檔時的缺省參數對象
object oMissing = System.Reflection.Missing.Value;
// 根據參數組是否為空,準備參數組對象
object[] paraObjects;
if (parameters == null)
{
paraObjects = new object[] { macroName };
}
else
{
// 宏參數組長度
int paraLength = parameters.Length;
paraObjects = new object[paraLength];
paraObjects[0] = macroName;
for (int i = 0; i < paraLength; i++)
{
paraObjects[i] = parameters[i];
}
}
#endregion
// 創建Excel對象示例
Microsoft.Office.Interop.Excel.Application oExcel = new Microsoft.Office.Interop.Excel.Application();
try
{
// 判斷是否要求執行時Excel可見
if (isShowExcel)
{
// 使創建的對象可見
oExcel.Visible = true;
}
// 創建Workbooks對象
Microsoft.Office.Interop.Excel.Workbooks oBooks = oExcel.Workbooks;
// 創建Workbook對象
Microsoft.Office.Interop.Excel._Workbook oBook = null;
// 打開指定的Excel文檔
oBook = oBooks.Open(
excelFilePath,
oMissing,
oMissing,
oMissing,
oMissing,
oMissing,
oMissing,
oMissing,
oMissing,
oMissing,
oMissing,
oMissing,
oMissing,
oMissing,
oMissing
);
// 執行Excel中的宏
rtnValue = this.RunMacro(oExcel, paraObjects);
// 保存更改
oBook.Save();
// 退出Workbook
oBook.Close(false, oMissing, oMissing);
#region 釋放對象
// 釋放Workbook對象
System.Runtime.InteropServices.Marshal.ReleaseComObject(oBook);
oBook = null;
// 釋放Workbooks對象
System.Runtime.InteropServices.Marshal.ReleaseComObject(oBooks);
oBooks = null;
#endregion
}
catch (Exception ex)
{
throw ex;
}
finally
{
if (oExcel != null)
{
// 關閉Excel
oExcel.Quit();
// 釋放Excel對象
System.Runtime.InteropServices.Marshal.ReleaseComObject(oExcel);
oExcel = null;
// 調用垃圾回收
GC.Collect();
}
}
}
/// <summary>
/// 執行宏
/// </summary>
/// <param name="oApp">Excel對象</param>
/// <param name="oRunArgs">參數(第一個參數為指定宏名稱,後面為指定宏的參數值)</param>
/// <returns>宏返回值</returns>
private object RunMacro(object oApp, object[] oRunArgs)
{
try
{
// 聲明一個返回對象
object objRtn;
// 反射方式執行宏
objRtn = oApp.GetType().InvokeMember(
"Run",
System.Reflection.BindingFlags.Default |
System.Reflection.BindingFlags.InvokeMethod,
null,
oApp,
oRunArgs
);
// 返回值
return objRtn;
}
catch (Exception ex)
{
// 如果有底層異常,拋出底層異常
if (ex.InnerException.Message.ToString().Length > 0)
{
throw ex.InnerException;
}
else
{
throw ex;
}
}
}
}