vba - Excel VBA为事件单元格制作超链接

Question

我想从工作簿 1 中的事件单元格创建一个链接，我可以在工作簿 2 中使用它。我使用分配给按钮的以下代码:

 With ActiveSheet
   .Hyperlinks.Add Range("F6"), _
      .Parent.FullName & "#'" & .Name & "'!" & "$A$1", TextToDisplay:="link"
 End With

此代码创建了一个完整路径的链接，我可以在任何工作簿中使用它，但我需要进行一些更改:

使事件单元格超链接不是代码中指定的单元格 A1。

事件单元格中的值变为文本以显示超链接功能的 arg。

谢谢

在 Vityata 回答后 PS:如何将 Range("F6") 更改为 activecell 地址？

Answer 1

为了获得事件单元格的值和地址，请将代码更改为相应的位置，如下所示:

ActiveCell.Address
ActiveCell.Value