Question

我有一个批处理文件，它运行一组SQL查询并将数据加载到表中。

我已经为excel中的按钮点击编写了VBA脚本，以从上表中检索数据。

但是现在我的要求已经改为在没有按钮点击的情况下将数据填充到excel中。另外，我不希望我的代码在工作簿中打开事件。

我必须将我的vba代码更改为.vbs脚本，以便我可以从批处理文件中调用它。请帮我。如果我的方法错了，请纠正我。

Answer 1

写一个VBscript：

执行蝙蝠

shell.Run """C:\...\my.bat"""

然后执行宏（下面的例子）

    RunMacro
     Sub RunMacro()
     Dim xl
     Dim xlBook      
     Dim sCurPath
     path = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".")
     Set xl = CreateObject("Excel.application")
     Set xlBook = xl.Workbooks.Open(path & "\Workbook.xlsm", 0, True)      
     xl.Application.Visible = False
     xl.DisplayAlerts = False    
     xl.Application.run "Workbook.xlsm!Module.RunMacro"
     xl.ActiveWindow.close
     xl.Quit

     Set xlBook = Nothing
     Set xl = Nothing
 End Sub

使用vbscript从批处理文件中将数据提取到Excel中

1 个答案: