Shell関数を使って、ファイル名を指定して開くこ

質問

オフィス２００３です。

Sub サンプル1()
Dim strExcelPath As String

strExcelPath = "C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE"
Shell strExcelPath, 1
End Sub

なら空のエクセルアプリケーションが開けます。

でも、
Sub サンプル2()
Dim strExcelPath As String

strExcelPath = "D:\ファイル.xls"
Shell strExcelPath, 1
End Sub
だと、

“プロシージャの呼び出し、または引数が不正です。“
と言うエラーになります。

Shell関数を使って、ファイル名を指定して開くことはできないのでしょうか？

回答No.2

okormazd · ベストアンサー

"ファイル.xls"は実行ファイルではなく、データファイルなので、Shellでは開けません。

Excelで開くなら、引数にこのファイルを当てて、

strExcelPath = "C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE　D:\ファイル.xls"
Shell strExcelPath, 1

でしょう。

お礼

ご回答ありがとうございます。

回答No.1

notnot

strExcelPath = "cmd.exe /c start D:\ファイル.xls"
でどうでしょうか。

お礼

ご回答ありがとうございます。