从 visio 检测 IE 上的事件

我可以在 IE 页面上的按钮和 visio 事件之间建立链接吗？ （例如：只需单击 IE 页面上的按钮即可更改形状的颜色）

除非您也可以访问 IE 中的 HTML 内容，否则这并不容易，但是您可以使用 VBA 类，该类实现“withevents”私有变量来捕获对页面上特定元素的引用，并且该类具有事件处理程序响应基于浏览器的事件。例如。在“clsHTML”类中：

Private WithEvents el As MSHTML.HTMLInputElement

Public Sub SetElement(t As MSHTML.HTMLInputElement)
    Set el = t
End Sub

Private Function el_onchange() As Boolean
    Debug.Print "captured change: value = " & el.Value
End Function 

在其他代码中，创建该类的实例并使用对 IE 中页面上元素的引用来调用“SetElement”：

Dim objHTML As clsHTML  'global variable


Sub TestEvents()
   Dim IE As Object

    'set up your IE reference....

  Set objHTML = New clsHTML
  objHTML.SetElement IE.document.getElementById("tester2")
  Debug.Print "set capture"
End Sub

在本例中，您正在捕获文本框上的“更改”事件，但其他元素将公开不同的事件......

编辑：我在 Excel 中对此进行了测试，但我假设类似的功能也适用于 Visio。

Edit2：在 Visio 中创建一个表单来处理这个问题可能比坚持使用自动化 IE 更好。