×

小刀网

隐藏链接(钣金箱体隐藏链接)

访客 访客 发表于2022-05-05 12:35:00 浏览491 评论4

4人参与发表评论

作者:兰色幻想-赵志东 转自:Exc++el精英培训

Excel目录相关的教程已有很多,昨天微信一位同学的留言引起了兰色的兴趣,超链接的工作表如果是隐藏的,可以显示出来吗?

就如下面动画所演示的,点击链接竟然可以打开被隐藏的excel工作表。

是不是觉得很神奇,可惜的是Excel的超链接对隐藏的工作表无效!

想知道兰色是怎么做出来的,就一起操作吧:

1、在任一工作表标签上点击右键 - 查看代码,在弹出的新窗口(visual basic for....)中双击左上侧的工程资源管理品中的thisworkbook,然后把下面的代码粘贴到右侧的空白处。

Private sub Workbook_SheetFollowHyperlink(ByVal Sh As object, ByVal target As Hyperlink)

Sheets(Target.Range.Text).Visible = -1

Sheets(Target.Range.Text).select

End Sub

2、文件另存为"启用宏的工作簿(*.xlsm)“格式。

设置完成!

注意:本方法对公式生成的超链接无效

兰色说:本文是使用了工作簿的超链接触发事件,新手同学不需要懂VBA代码的意思,只需要学会粘贴即可,注意千万别粘错过方了。

群贤毕至

访客
瑰颈照雨 瑰颈照雨2024-02-09 01:12:57 | 回复 在弹出的新窗口(visual basic for....)中双击左上侧的工程资源管理品中的thisworkbook,然后把下面的代码粘贴到右侧的空白处。Private sub Workbook_
笙沉氿雾 笙沉氿雾2024-02-08 23:53:31 | 回复 超链接对隐藏的工作表无效!想知道兰色是怎么做出来的,就一起操作吧:1、在任一工作表标签上点击右键 - 查看代码,在弹出的新窗口(visual basic for....)中双击左上侧的工程资源管理品中的thisworkbook,然后把下面的代码粘贴到右侧的空白处。Privat
听弧念稚 听弧念稚2024-02-09 03:45:58 | 回复 作者:兰色幻想-赵志东 转自:Exc++el精英培训Excel目录相关的教程已有很多,昨天微信一位同学的留言引起了兰色的兴趣,超链接的工作表如果是隐藏的,可以显示出来吗?就如下面动画所演示的,点击链接竟然可以打开被隐藏的excel工作表。是不是觉得很神奇,可惜的是Exce
鸢旧双笙 鸢旧双笙2024-02-09 08:39:07 | 回复 ivate sub Workbook_SheetFollowHyperlink(ByVal Sh As object, ByVal target As Hyperlink)Sheets(Target.Range.Text).Visible = -1Sheets(Targe