[英]Excel VBA runtime error 5 using hyperlink function
我正在开发一个使用超链接调用宏的程序。 因此,我使用超链接。 该函数应该在我的第一个电子表格上创建带有第二个电子表格信息的超链接。
我的问题是,在“创建超链接子”中使用以下代码得到运行时错误5。 我看不出问题出在哪里。 希望您能够帮助我。
Sub createhyperlink()
Dim c1, r1, c2, r2 as Integer
c1=2
r1=2
c2=3
r2=3
FirstSheet.Hyperlinks.Add Anchor:=FirstSheet.Cells(c1, r1), _
Address:="", _
SubAddress:=Firstsheet.Cells(c1, r1), _
TextToDisplay:=SecondSheet.Cells(c2, r2)
End Sub
您缺少.Address和.Value
Sub createhyperlink()
Dim c1 As Long, r1 As Long, c2 As Long, r2 As Long
c1 = 2
r1 = 2
c2 = 3
r2 = 3
Firstsheet.Hyperlinks.Add Anchor:=Firstsheet.Cells(c1, r1), _
Address:="", _
SubAddress:=Firstsheet.Cells(c1, r1).Address, _
TextToDisplay:=Secondsheet.Cells(c2, r2).Value
End Sub
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.