Excel - 如何有选择地 运行 超链接事件 VBA 代码取决于跳转到哪个工作表?
Excel - How to selectively run Hyperlink event VBA code depending on what worksheet it is jumping to?
我在一个工作表中有超链接,可以跳转到使用其他工作表中命名范围的单元格。下面的工作代码切换工作表(基于超链接)并在我单击超链接时将目标单元格放在左上角。这非常有效。
但是,在一个特定的超链接上,我希望它只切换到工作表,但我不想 运行 下面的代码将它放在左上角。我只想切换工作表并单独放置定位。
由于下面的代码是单击任何超链接时的事件,我想检查特定的目标工作表而不是 运行 下面的代码。
有没有办法(如果...那么?)检测我要切换到的工作表而不执行下面的代码?
提前致谢。
Option Explicit
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
ActiveWindow.ScrollRow = ActiveCell.Row
ActiveWindow.ScrollColumn = ActiveCell.Column
End Sub
伪代码 - 我正在寻找 VBA 粗体代码。
Option Explicit
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
**If (name in hyperlink) = "my target sheet" Then exit sub**
ActiveWindow.ScrollRow = ActiveCell.Row
ActiveWindow.ScrollColumn = ActiveCell.Column
End Sub
原来答案很简单。 :) 我对 VBA 一无所知,但 BigBen 给了我一些提示。
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
If Target.Name = "<target sheetname>" Then Exit Sub
ActiveWindow.ScrollRow = ActiveCell.Row
ActiveWindow.ScrollColumn = ActiveCell.Column
End Sub
我在一个工作表中有超链接,可以跳转到使用其他工作表中命名范围的单元格。下面的工作代码切换工作表(基于超链接)并在我单击超链接时将目标单元格放在左上角。这非常有效。
但是,在一个特定的超链接上,我希望它只切换到工作表,但我不想 运行 下面的代码将它放在左上角。我只想切换工作表并单独放置定位。
由于下面的代码是单击任何超链接时的事件,我想检查特定的目标工作表而不是 运行 下面的代码。
有没有办法(如果...那么?)检测我要切换到的工作表而不执行下面的代码?
提前致谢。
Option Explicit
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
ActiveWindow.ScrollRow = ActiveCell.Row
ActiveWindow.ScrollColumn = ActiveCell.Column
End Sub
伪代码 - 我正在寻找 VBA 粗体代码。
Option Explicit
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
**If (name in hyperlink) = "my target sheet" Then exit sub**
ActiveWindow.ScrollRow = ActiveCell.Row
ActiveWindow.ScrollColumn = ActiveCell.Column
End Sub
原来答案很简单。 :) 我对 VBA 一无所知,但 BigBen 给了我一些提示。
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
If Target.Name = "<target sheetname>" Then Exit Sub
ActiveWindow.ScrollRow = ActiveCell.Row
ActiveWindow.ScrollColumn = ActiveCell.Column
End Sub