excel - Worksheet_FollowHyperlink 和 MsgBox 在 Excel 2010 中不起作用

Question

单元格 A1:

=HYPERLINK("#Sheet2!a2","link")

工作表->查看代码

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
MsgBox ("hello")
End Sub

当我左键单击 A1 时，MessageBox 未打开；相反，#Sheet2!a2 打开。让事情变得更加复杂的是，

工作表->查看代码

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
MsgBox ("hello")
End Sub

右键单击带有超链接的单元格确实会触发消息框，但谷歌无论如何都会触发。

工作表->查看代码

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
MsgBox ("hello")
End Sub

现在双击A1不会生成消息框。

为什么？

Answer 1

嗯，这对我来说是一个新问题，但在 2003 年和 2010 年，包含 HYPERLINK() 函数的单元格不会触发 FollowHyperlink 事件。两个版本都支持 native 超链接。

看起来会触发 SelectionChange 事件，因此您可以测试单元格中是否存在超链接或您需要的任何其他测试。