找到我们需要隐藏的其中一张工作表，这里我将其命名为‘要隐藏的工作表名’，将光标移动到开发工具，再移动到左上方‘Visual Basic’,打开我们的VBE界面
02来到VBE界面，在左侧空白处右键，在弹出提示中选择——插入——模块，自动跳转到模块编程界面
03将以下代码复制即可
Sub 隐藏()
Dim ws As Worksheet
Set ws = Worksheets("要隐藏的工作表名")
ws.Visible = xlSheetVeryHidden
End Sub
Sub 恢复可见()
Dim ws As Worksheet
Set ws = Worksheets("要隐藏的工作表名")
ws.Visible = xlSheetVisible
End Sub
点击那个小三角运行，跳出来选择界面，选择我们刚刚写的隐藏那个小程序，点击运行就好了
05关掉VBE回到我们工作表界面，工作表不见了，取消隐藏图标无法点击，
06到这里就结束了，需要恢复工作表时，只需要再次打开VBE界面，找到我们新建的那个模块，点击运行，选择可见的那段代码运行即可
记得另存为XLSM哦，否则代码不保存
