vba来统计超链接上的点击次数

我有超过20超链接的工作簿中的选项卡。 我想跟踪超链接上的点击，以查看哪个超链接被利用最多。 所以可以说，所有的超链接都在列“A”非常理想，如果我点击一个超链接，我想点击单元格数“B”。 希望有人能帮忙。 我尝试使用一些公式，但没有运气。

下面是我使用的代码，但不工作，并没有错误信息。

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) ThisWorkbook.Activate Selection.Offset(0, 3).FormulaR1C1 = Selection.Offset(0, 3).Value + 1 End Sub 

Answer 1

您可以尝试FollowHyperlink事件

设置

单击HyperLink时的结果

这是进入工作表模块的代码

 Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink) Dim s As Range Set s = Target.Range s.Offset(0, 1) = s.Offset(0, 1) + 1 End Sub