Excel VBA插入超链接

Question

我一直在尝试获取宏，现在已经插入了两个小时的动态超链接，但似乎无法正确获取语法。

我需要使宏在rLinkCell中插入指向rTargetCell中的shTargetSheet的超链接，使用标签或显示文本stLinkName并具有屏幕提示stTip 。

我到现在为止：

shCurSheet.Hyperlinks.Add Anchor:=rLinkCell, _
           Address:="", _
           SubAddress:=shTargetSheet.Name & "!" & rTargetCell.Address, _
           ScreenTip:=stTip, _
           TextToDisplay:=stLinkName

它使链接完美，并且所有显示都很好，但是当我单击它时，我收到一条错误消息，指出Refrence is not valid 。

我敢肯定这很简单，我做错了什么？

Answer 1

如果您要做的只是在工作表上创建超链接，则只需使用= HYPERLINK（）函数。

我刚刚创建了一个示例工作簿，这是公式解决方案： https : //spreadgit.com/bjoern/hyperlink-example.xlsb/sheets/Sheet1

这是VBA解决方案： https : //spreadgit.com/bjoern/hyperlink-example.xlsb/modules/Module1