excel如何设置索引目录（excel索引目录怎么做）
导读 Private Sub Workbook_SheetActivate(ByVal Sh As Object) i = 2 Do If i Sh.Index The...
Private Sub Workbook_SheetActivate(ByVal Sh As Object) i = 2 Do If i <> Sh.Index Then Worksheets(i).Visible = False i = i + 1 Loop Until i > Worksheets.Count End Sub 使用VBA来做最简单，把我这些代码复制到“ThisWorkbook"代码窗口里，打开文件时，就会只显示第一张工作表了。
而在第一张工作表里建十个按钮，每个按钮都和一段代码关联，如： XX.sheet(X).visible=true 具体视你的工作表名称而定。
试试看就知道了。
免责声明：本文由用户上传，如有侵权请联系删除！
