如何用超链接打开隐藏工作表呢?
![](/wenda/images/newWd/search.png)
问题已解决
所属话题:
#Excel#
![](http://member.chinaacc.com/homes/resources/images/home/avatar/3.jpg)
84785003 | 提问时间:06/20 13:59
您好,我们是要链接隐藏工作表么,这要用VBA
第一,按照最常用的方法对“天干”worksheet中的对应名称建立超链接。
第二,按Alt+F11,启动VBA编辑,点击左侧“天干地支”工作簿下的“天干”worksheet,在右侧打开的编辑框中复制以下代码:
Private Sub Worksheet_Activate()
Dim sht As Worksheet
For Each sht In Worksheets
If sht.Name <> Sheets(1).Name Then sht.Visible =
xlSheetVeryHidden
Next
sht
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
Sheets(Target.Value).Visible = xlSheetVisible
Sheets(Target.Value).Select
End Sub
第三,运行代码并保存退出。
06/20 14:03
相关问答
查看更多最新问答
查看更多