passando argumento de vba para vbs

Eu tenho um script vb e excel página com o botão de comando.

vb script --- test.vbs

MsgBox("Hello world")

excel código vba

Private Sub CommandButton1_Click()
  Dim SFilename As String
    SFilename = "C:\Users\mkamaraj\Desktop\test.vbs" 'Change the file path

    ' Run VBScript file
    Set wshShell = CreateObject("Wscript.Shell")
    wshShell.Run """" & SFilename & """"
End Sub

Quando clico no botão no Excel, ele executa oVBScript e aMessageBox é exibido. Agora preciso passar peloTextBox valor deExcel VBA paraVBScript e esse valor deve ser exibido com issoVBScript MessagBox.

Como eu posso fazer isso?

questionAnswers(2)

yourAnswerToTheQuestion