Gruppe
Extern
Problem
Ein VBScript soll mit den Argumenten Anwendername und Datum/Zeit aufgerufen werden.
StandardModule: Modul1
Sub VbsAufruf()
Dim sFile As String
Dim sArg As String
sArg = """" & Application.UserName & Chr(34) & Now & """"
sFile = ThisWorkbook.Path & "\message.vbs "
Shell "WScript.exe " & sFile & sArg, vbNormalFocus
End Sub