|
皆さん、こんにちは。
>
クウガさんの方法でご希望の表示であれば、これが簡単だし良いと思いますが・・。
>ヘルプによると、Shell は
>>実行可能プログラムを実行し
>とありますので、*.hlp が実行可能プログラムでないためにエラーになるのでは?
とおっしゃているように、ExcelブックをExcelを起動しないで立ち上げようとしているのに等しいことになってしまいます。
'===========================================================
Sub test()
ph = Shell("C:\WINDOWS\winhlp32.exe c:\windows\help\Sol.hlp", vbNormalFocus)
' hlpのパス
End Sub
関連付けがされていれば(普通はされています)、
'=================================================================
Sub test2()
Set wshshell = CreateObject("WScript.Shell")
wshshell.Run "c:\windows\help\Sol.hlp", 1
End Sub
なんて方法があります。
確認してみて下さい。
|
|