1)自动隐藏:除目录工作表外,设定每个工作表的Deactivate事件代码如下
Private Sub Worksheet_Deactivate()
Me.Visible = xlSheetHidden
End Sub
2)目录工作表中插入按钮,给每个按钮指定代码如下例:
Private Sub CommandButton1_Click()
With Sheet1
.Visible = True
.Select
End With
End Sub
你的问题要用VBA代码才能完成。在工作表的打开链接事件中写隐藏或显示代码。
参考