[已解决]超链接与事件谁先执行

玄乐

超链接：A1链接到k1:p1

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$A$1" Then
        [K1].Select
    End If
End Sub

执行前，我觉着先执行事件。可是看了几遍，却发现是先执行超链，再执行事件。

请问有没有方法证明？谢谢！

5hlzt1DL.rar (7.88 KB, 下载次数: 13)

2009-9-11 09:52 上传

点击文件名下载附件
超链接与事件谁先执行

最佳答案

月排行榜 / 总排行榜

amulee

2009-9-11 10:38

好像是同时进行的。当点击后触发了单元格事件，同时进行了跳转，再激发新的单元格事件。

你可以修改代码如下，将超链接设为K1。

当点击A1时可以看到，程序先停止运行，然后你回到工作表看看当前单元格已经跳转到K1。继续程序，又会弹出提示框。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$K$1" Then MsgBox 2
    If Target.Address = "$A$1" Then
        Stop
    End If
End Sub

跳转到最佳答案楼层

amulee

好像是同时进行的。当点击后触发了单元格事件，同时进行了跳转，再激发新的单元格事件。

你可以修改代码如下，将超链接设为K1。

当点击A1时可以看到，程序先停止运行，然后你回到工作表看看当前单元格已经跳转到K1。继续程序，又会弹出提示框。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Address = "$K$1" Then MsgBox 2
    If Target.Address = "$A$1" Then
        Stop
    End If
End Sub

玄乐

谢谢amulee[em25]

啊，照2楼方法，结论是：先执行超链。

原来，操作比事件的优先级高呀

lotte

学习最佳答案