Ms Excel VBA - Using Shell command to open files

Question

I am developing a workbook in Excel-VBA and i want to execute a script using HEC DSS. That means, using excel-vba, i need to open "HEC DSS" first and then i'll instruct the application to open the script.

We keep it simple and try to correlate the above scnerio with a NotePAd.exe and a txt file. For the purpose, i have googled and tried different things but none worked. I am trying to use the SHELL command. Please find the code below:

---

Sub test()

Dim retval as string

dim file name as variant

filename="C:\Users\Nayar Asif\Desktop\Test_2.txt"

retval = Shell("notepad.exe" & filename, vbnormalfocus)

end sub

The above code does not work. The idea is to open the notepad application and then open the notepad file. Any help????

Regards Nayyar

Answer 1

带空格的文件路径应用引号引起来

retval = Shell("notepad.exe """ & filename & """", vbnormalfocus)

Answer 2

解决方案只是notepad.exe之后和第二个引号之前的“空格”：

retval = Shell("notepad.exe " & filename, vbnormalfocus)