Shell *.vbs from within VBA

Question

Hi can anyone tell me how to execute my .vbs from within VBA cause the following code dose not work.

RetBat4 = Shell("c:\VTS\QUEEN ANNES REVENGE\SYSTEM\VBS\UNDO_2.vbs", 1)

VBA debug says that the sytax is wrong????

thanks

Community · Accepted Answer · 2017-05-23 11:56:09Z

1

Try

Shell("cscript ""c:\VTS\QUEEN ANNES REVENGE\SYSTEM\VBS\UNDO_2.vbs""",1)

If your VBS needs complete command shell environment, use this:

Shell("cmd /c cscript ""c:\VTS\QUEEN ANNES REVENGE\SYSTEM\VBS\UNDO_2.vbs""",1)

and if your program should wait until the VBS ends, read this post:

CommunityBot

11 silver badge

answered Nov 2, 2010 at 16:10

Doc Brown

20.2k7 gold badges56 silver badges95 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

Aminadav Glickshtein · Accepted Answer · 2012-02-24 03:28:37Z

0

try This:

Set ws=CreateObject("Wscript.shell")
set ws.exec("ping " & ip & " -n 20")
set ws=nothing

answered Feb 24, 2012 at 3:28

24.8k13 gold badges84 silver badges118 bronze badges