作者热门文章
- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
我正在开发一个使用超链接调用宏的程序。因此我使用 hyperlink.add 功能。该函数应该使用我的第二个电子表格的信息在我的第一个电子表格上创建一个超链接。
我的问题是我在“创建超链接子”中使用以下代码得到运行时错误 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
关于Excel VBA运行时错误5使用超链接函数,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/53522473/
我是一名优秀的程序员,十分优秀!