有2种方案，一种是设置不显示工作表标签，也就无需隐藏工作表。另一种是用VBA代码实现，代码如下（具体示例文件可在链接中下载）：Private Sub Worksheet_Activate()
Dim sht As Worksheet
For Each sht In Worksheets
If sht.Name"目录" Then sht.Visible = xlSheetVeryHidden
Next shtEnd SubPrivate Sub Worksheet_SelectionChange(ByVal Target As Range...
