VB 如何调用EXCEL VBA带参过程
发布网友
发布时间：2022-05-09 21:37
共1个回答
热心网友
时间：2023-10-22 17:28
/*----------有参调用模式-------------*/
xls文件中代码如下：
Sub test2(str As String)
MsgBox (str)
End Sub
VB代码如下：
Dim xlsApp As Excel.Application
Dim xlsBook As Excel.Workbook
Dim xlsSheet As Excel.Worksheet
Set xlsApp = New Excel.Application
Set xlsBook = xlsApp.Workbooks.Open(App.Path + "\test.xls")
Set xlsSheet = xlsBook.Worksheets(1)
xlsApp.Visible = False
Call xlsApp.Run("test2", "Hello!World!")
