Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Shell Command : Extremely Frustrated
I am having problems with the shell command in Excel 2003 trying to launch a
specific application from an Excel Macro. My test procedures are as follows : Sub Test1() MsgBox Shell("c:\ausynch.exe",1) ' This does not launch the app End Sub The msgbox does return a value indicating the application has been launched but the exe is not running/visible. If I run the command in the Run programme or from DOS prompt the exe runs. If I replace c:\ausynch.exe in the code with say notepad.exe or calc.exe or c:\Program Files\Internet Explorer\IEXPLORE.EXE it works. The code simply does not work against the ausynch.exe application. If I run the procedure below I get the error msg "Run time error '5': Invalid procedure or argument. Sub Test2() myApp = Shell("c:\ausynch.exe",1) appActivate myApp End Sub Any help or test ideas would enormously appreciated. JOHN. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Shell Command : Extremely Frustrated
Try using the object instead of shell.
Private Sub Command4_Click() Dim APword As Object Set APword = CreateObject("word.APPLICATION") APword.Visible = True AppActivate APword End Sub -----Original Message----- I am having problems with the shell command in Excel 2003 trying to launch a specific application from an Excel Macro. My test procedures are as follows : Sub Test1() MsgBox Shell("c:\ausynch.exe",1) ' This does not launch the app End Sub The msgbox does return a value indicating the application has been launched but the exe is not running/visible. If I run the command in the Run programme or from DOS prompt the exe runs. If I replace c:\ausynch.exe in the code with say notepad.exe or calc.exe or c:\Program Files\Internet Explorer\IEXPLORE.EXE it works. The code simply does not work against the ausynch.exe application. If I run the procedure below I get the error msg "Run time error '5': Invalid procedure or argument. Sub Test2() myApp = Shell("c:\ausynch.exe",1) appActivate myApp End Sub Any help or test ideas would enormously appreciated. JOHN. . |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Shell Command : Extremely Frustrated
Many thanks. I will look at this, although I suspect it will not resolve my
problem. The reason being I need a function that returns a value (like the shell command) that I can use subsequently to test if the application is running. This is done in a ShellAndWait function. http://groups.google.com/groups?thre...%40tkmsftngp03 John. "DMoney" wrote: Try using the object instead of shell. Private Sub Command4_Click() Dim APword As Object Set APword = CreateObject("word.APPLICATION") APword.Visible = True AppActivate APword End Sub -----Original Message----- I am having problems with the shell command in Excel 2003 trying to launch a specific application from an Excel Macro. My test procedures are as follows : Sub Test1() MsgBox Shell("c:\ausynch.exe",1) ' This does not launch the app End Sub The msgbox does return a value indicating the application has been launched but the exe is not running/visible. If I run the command in the Run programme or from DOS prompt the exe runs. If I replace c:\ausynch.exe in the code with say notepad.exe or calc.exe or c:\Program Files\Internet Explorer\IEXPLORE.EXE it works. The code simply does not work against the ausynch.exe application. If I run the procedure below I get the error msg "Run time error '5': Invalid procedure or argument. Sub Test2() myApp = Shell("c:\ausynch.exe",1) appActivate myApp End Sub Any help or test ideas would enormously appreciated. JOHN. . |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Shell Command | Excel Programming | |||
Shell command | Excel Programming | |||
xp shell command using vba | Excel Programming | |||
Closing DOS window after shell command | Excel Programming | |||
SHELL command | Excel Programming |