请问怎么建立超级链接到特定工作簿的工作表

wuyunxz · 发表于 2017-12-18 09:45

本帖最后由 wuyunxz 于 2017-12-18 15:34 编辑

ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="D:\12月.xlsx", TextToDisplay:="123"

上面的代码我录制的宏得到的，但是只能超级链接到工作簿。

如果我想链接12月这个工作簿的某一个工作表，请问怎么修改代码？

fxl447098457 · 发表于 2017-12-18 10:11

Address:="D:\12月.xlsx#汇总!A1",意思就是连接到D盘12月.xlsx文件的名为"汇总"的工作表。

wangxml · 发表于 2017-12-18 10:12

Sub linkToTargetSheet()
Dim wbName As String
wbName = "Book10.xlsm"
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=ThisWorkbook.Path & "" & wbName, SubAddress:="#Sheet3!B2", TextToDisplay:="123"
End Sub

复制代码

wuyunxz · 发表于 2017-12-18 15:33

wangxml 发表于 2017-12-18 10:12

谢谢你的回答，我的问题解决了！

wuyunxz · 发表于 2017-12-18 15:33

fxl447098457 发表于 2017-12-18 10:11
Address:="D:\12月.xlsx#汇总!A1",意思就是连接到D盘12月.xlsx文件的名为"汇总"的工作表。

谢谢你的回答，我的问题解决了！

		自动登录	找回密码
密码			免费注册

[已解决] 请问怎么建立超级链接到特定工作簿的工作表

最新热点 /1