Sub Label1() Set WSShell = CreateObject("Wscript.Shell") WSShell.Run """c:\Program Files (x86)\Foxit Software\Foxit Reader\Foxit Reader.exe"" /n ""D:\Bootstrap.pdf"" /n ""-n"" /n 12" End Sub