如何用vba打开一个chm文档？

xunxujianjin

我做了一个带vba程序的excel 文档和一个 chm帮助文档 (假设是C:\1.chm)

想在excel里嵌个按钮，按下按钮则打开该chm文档

请问这个按钮命令该怎么写呢？ 是用shell么，没试成功 :( ？

多谢啦！

[ 本帖最后由 xunxujianjin 于 2009-7-4 12:04 编辑 ]

987654321

Option Explicit
Public Const SW_SHOWNORMAL = 1
    Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
    (ByVal hWnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
    ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Sub 帮助()
   ShellExecute 0, "Open", ThisWorkbook.Path & "\aaaa.chm", "", "", SW_SHOWNORMAL
End Sub

sobne

shell 即可

xunxujianjin

多谢!!!! 非常感谢

northwolves

可调用默认打开方法：

1. 
   
2. Shell "RUNDLL32.EXE URL.DLL,FileProtocolHandler  C:\1.chm", vbMaximizedFocus
   

复制代码