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

如何深度隐藏excel工作表,让别人都找不到?,第1张

如何深度隐藏excel工作表,让别人都找不到? 01

找到我们需要隐藏的其中一张工作表,这里我将其命名为‘要隐藏的工作表名’,将光标移动到开发工具,再移动到左上方‘Visual Basic’,打开我们的VBE界面

02

来到VBE界面,在左侧空白处右键,在d出提示中选择——插入——模块,自动跳转到模块编程界面

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哦,否则代码不保存

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/4779931.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-11-09
下一篇 2022-11-09

发表评论

登录后才能评论

评论列表(0条)

保存