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

时间:2012-02-15 21:04:05

标签: excel excel-vba vbscript vba

我想以编程方式(在vbscript或命令行或其他任何方式)将VBA代码注入我从FTP站点获取的工作簿,然后在工作簿上执行宏。全部自动化。没有用户互动。

我在文本文件中定义了VBA代码。

1 个答案:

答案 0 :(得分:2)

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

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