2012-09-23 103 views
0

請幫我做這個代碼的作品。我想用Powerpoint VBA打開一個外部EXE文件。打開一個外部EXE。文件使用VBA Powerpoint

Sub open_test() 
Dim FileName, FSO, MyFile 
FileName = "C:\test.exe" 
Set FSO = CreateObject("Scripting.FileSystemObject") 
Set MyFile = FSO.OpenTextFile(FileName, 1) 
End Sub 

有沒有編譯器錯誤,但是當我執行宏,它什麼都不做。我有另一個替代這個代碼?請幫助我,謝謝

+0

什麼是你想用的文件呢?你已經列出的代碼打開C:\ test.txt作爲一個'TextStream',它只對流沒有任何作用。 –

+0

ohh ...對不起...我想執行一個外部exe文件。文件...(如shell命令)...但我不知道該怎麼做...謝謝 – Andrei20193

回答

4

如果你只是想啓動的程序,請嘗試使用

Sub open_test() 
    Dim sFullPathToExecutable as String 
    sFullPathToExecutable = "C:\test.exe" 
    Shell sFullPathToExecutable 
End Sub 
+0

呵呵...它的工作原理。非常感謝你 ! – Andrei20193