VBA -Befehlsfenster öffnen
Sub cmdWinOpen()
Dim res
Dim shell As Object
Set shell = VBA.CreateObject("WScript.Shell")
res = shell.Run("cmd /k " & "your command")
End Sub
peamdev