Question

我需要在Excel中运行VBA宏，但是要从VBS文件中运行。我打开Excel文件和编写一些值的代码如下：

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("C:\Users\user\Desktop\test1.xlsm")
objExcel.Application.Visible = True
objExcel.Cells(1,2).Value = "Test value"
WScript.Quit

此文件中有2个简单的宏：test1和test2。我需要通过VBS运行它们。

Answer 1

要从其他宏运行宏，您只需将这些行添加到您的代码中...只要您在个人表中保存了宏，代码应如下所示...如果您已将它们保存在另一个中表格，然后更改代码的部分，其中表示personal.xlsb为您的工作表的名称......

Application.Run "PERSONAL.XLSB!test1"
Application.Run "PERSONAL.XLSB!test2"

Answer 2

我需要提出一些想法：

objExcel.Application.Run "test1"

之后

Set objWorkbook = objExcel.Workbooks.Open("C:\Users\user\Desktop\test1.xlsm")

我的代码如下：

Set objExcel = CreateObject("Excel.Application")
Set objWorkbook = objExcel.Workbooks.Open("C:\Users\user\Desktop\test1.xlsm")
objExcel.Application.Visible = True
objExcel.Application.Run "test1"
objExcel.Application.Run "test2"

通过VBS打开Excel并在那里运行宏

2 个答案: