Pass Argument from VBS to VBA

Question

I try to call a VBA subroutine from VBS with passing a string variable from VBS to VBA, but can\'t find the appropiate syntax:

\'VBS:
\'---------------------         


        

Answer 1

You need to specify parameters in your VBA Sub and use them as you would do if using it from VBA normally.

For example, I tried the following VBScript

dim wd: set wd = GetObject(,"Word.Application")
wd.Visible = true
wd.run "test", "an argument"

and the VBA

Sub Test(t As String)
    MsgBox t
End Sub

which worked successfully, generating a message box.