Question

我有一个显示“确定”和“帮助”按钮的MsgBox。我想在点击“帮助”按钮时重定向到某个网站，但我完全无法实现它。我在一些论坛中已经读过，获得它的最简单方法是创建自己的用户窗体并为每个附加的按钮分配子程序。我找到的另一种可能的方法是创建一个* .hlp文件，从Help File参数调用它并放置正确的上下文ID，但我需要将帮助文件存储在一个网站中，无论如何，我可以'找到上下文ID号。在此先感谢您的帮助！

Answer 1

Here您可以找到管理使用Internet Explorer打开的网址所需的一切（最简单的方法）。在我给它的链接中将展示如何使用IE（Internet Explorer）库来管理一些任务，例如打开URL（当然，你可以通过点击＆＃34; help＆＃34;按钮来触发它们。您的用户表单），填写表单和/或点击网页中的按钮。虽然我认为如果您有直接帮助网页，第一个选项就足够了。
在我给你的链接中概述了什么可以帮助你：

Sub GoToWebSite()
Dim appIE As Object ' InternetExplorer
Dim sURL As String
Application.ScreenUpdating = False

Set appIE = GetIE

sURL = "yourhelpwebpage"

' Here you can add the "on Help button click" action to trigger the following
With appIE
    .Navigate sURL
    .Visible = True
End With

Application.ScreenUpdating = True

Set appIE = Nothing
End Sub

Answer 2

以下是您需要在VBE中输入帮助按钮的内容。

Private Sub HelpButton_Click()
Dim IE as Object

Set IE = CreateObject(InternetExplorer.Application)

IE.Visible = True

IE.Navigate = "Insert your URL here"
End Sub

单击vbMsgHelpButton时是否可以打开网站？

2 个答案: