excel vba 只显示目录工作表和当前工作表 其它的工作表全部隐藏

Question

一张工作薄里有6张工作表，第一张是目录，从目录里的链接进入到第二张工作表，再从第二张工作表进入到第三张工作表 目前有三张打开的工作表， 目录工作表是一直显示的（即使关闭后再打开也只显示目录），
我要实现的是：只显示目录工作表和当前打开的工作表（当前打开的为第三张工作表，也可能是第四张）其它的全部自动隐藏

请问大神 如何实现

Answer 1

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

追问

1看懂了，试了下，从目录进入1 再从1进入2 ，这时1不会自动隐藏，需要在1跟2工作表之间切换下才能实现自动隐藏

2这个代码没明白是什么意思 ，目录工作表中插入按钮是用来做什么的

麻烦大神解释下

Answer 2

你的问题要用VBA代码才能完成。在工作表的打开链接事件中写隐藏或显示代码。

Answer 3

参考

追问

大神 你这个没实现呀 从你的目录进入1 再从目录进入2 1没有隐藏呀

追答

你又没说进入2要隐藏1

追问

从目录进入1 再从1进入2 只显示目录跟2 隐藏1 这种代码如何写呀 大神

追答

看百无生的回答