将Excel VBA代码注入并执行到从外部源接收的电子表格中

我想以编程方式(在VBScript或命令行或其他)注入VBA代码到我从FTP站点获得的工作簿,然后在工作簿上执行macros。 全自动化。 没有用户交互。

我有一个文本文件中定义的VBA代码。

还没有机会尝试这个,但我认为这将做我所需要的。

Set objExcel = CreateObject("Excel.Application") objExcel.Visible = True objExcel.DisplayAlerts = False Set objWorkbook = objExcel.Workbooks.Open("C:\scripts\test.xls") Set xlmodule = objworkbook.VBProject.VBComponents.Add(1) strCode = _ "sub test()" & vbCr & _ " msgbox ""Inside the macro"" " & vbCr & _ "end sub" xlmodule.CodeModule.AddFromString strCode objWorkbook.SaveAs "c:\scripts\test.xls" objExcel.Quit