如何深度隐藏excel工作表，让别人都找不到？

操作方式

• 01

  找到我们需要埋没的此中一张工作表，这里我将其定名为‘要埋没的工作表名’，将光标移动到开辟东西，再移动到左上方‘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

  
• 04

  点击那个小三角运行，跳出来选择界面，选择我们方才写的埋没那个小程序，点击运行就好了

  
• 05

  关失落VBE回到我们工作表界面，工作表不见了，打消埋没图标无法点击，

  
• 06

  到这里就竣事了，需要恢复工作表时，只需要再次打开VBE界面，找到我们新建的那个模块，点击运行，选择可见的那段代码运行即可
  记得另存为XLSM哦，不然代码不保留

• End