Table of contents
本教程阐明了隐藏的工作表和非常隐藏的工作表之间的区别,解释了如何使工作表非常隐藏以及如何在Excel中查看非常隐藏的工作表。
你是否因为找不到你的一个公式所指的电子表格而感到气愤? 该表格没有出现在工作簿底部的其他标签中,也没有出现在 解除隐藏 那张纸到底在哪里呢? 很简单,它是非常隐蔽的。
什么是Excel中非常隐藏的工作表?
众所周知,Excel工作表可以是可见的,也可以是隐藏的。 事实上,工作表的隐藏有两个层次。 隐藏的 和 非常隐蔽 .
解除正常隐藏的工作表是非常容易的。 你所要做的就是右击任何可见的工作表,点击 解除隐藏 如果工作簿中只有非常隐蔽的工作表,你甚至无法打开 "工作表"。 解除隐藏 对话框,因为 解除隐藏 如果工作簿中同时包含隐藏的和非常隐藏的工作表,那么将禁用 解除隐藏 对话会有的,但非常隐蔽的床单不会在那里列出。
从技术上讲,Excel是如何区分隐藏和非常隐藏的工作表的呢? 通过 可见 属性,它可以有这些值中的一个。
- xlSheetVisible (或TRUE) - 工作表是可见的
- xlSheetHidden (或FALSE) - 工作表被隐藏了
- xlSheetVeryHidden - 这张纸很隐蔽
虽然任何人都可以通过使用Excel的 "可见 "和 "隐藏 "来切换TRUE(可见)和FALSE(隐藏)。 解除隐藏 或 隐藏 的命令,在 xlVeryHidden 值只能在Visual Basic编辑器中设置。
从用户的角度来看,隐藏的工作表和非常隐藏的工作表有什么区别呢? 简单来说就是:非常隐藏的工作表不能通过Excel的用户界面使其可见,唯一的方法就是用VBA来解除隐藏。 所以,如果你想让你的一些工作表更难被别人解除隐藏(比如那些包含敏感信息或中间公式的工作表),可以应用这个高张隐藏的水平,并使其非常隐藏。
如何让Excel工作表变得非常隐蔽
如前所述,使一个工作表非常隐蔽的唯一方法是使用Visual Basic编辑器。 根据你想隐藏的工作表的数量,你可以用以下方法之一进行。
通过改变工作表的 "可见 "属性使其非常隐蔽
如果你想只完全隐藏一个或两个工作表,你可以改变 可见 以下是方法。
- 按Alt + F11或点击 视觉基础 上的按钮。 开发商 这将打开Visual Basic编辑器,左上方的项目资源管理器窗口显示所有打开的工作簿及其工作表的树状图。
- 按F4或点击 查看 > 财产 这将迫使 财产 窗口出现在项目资源管理器的下方(请看下面的截图)。 如果 财产 窗口已经存在,跳过这一步 :)
- 在 "项目资源管理器 "窗口中,点击你想隐藏的工作表来选择它。
- 在 财产 窗口,设置 可见 财产,以 2 - xlSheetVeryHidden .
就是这样!只要 可见 如果有必要,对其他工作表重复上述步骤,完成后关闭Visual Basic编辑器窗口。
用VBA代码使活动工作表变得非常隐藏
如果你不得不经常隐藏工作表,并为必须手动操作而烦恼,你可以用一行代码来自动完成这项工作。 下面是使活动工作表非常隐蔽的宏。
Sub VeryHiddenActiveSheet() ActiveSheet.Visible = xlSheetVeryHidden End Sub如果你正在为其他用户编写一个宏,你可能想照顾到工作簿中只有一个可见工作表的情况。 你可能记得,在一个Excel文件中不可能完全隐藏所有的工作表(无论你是让它们隐藏还是非常隐藏),至少有一个工作表应该保持可见。 因此,为了警告你的用户这个限制,将上述宏包在一个 错误时 像这样的街区。
Sub VeryHiddenActiveSheet() On Error GoTo ErrorHandler ActiveSheet.Visible = xlSheetVeryHidden Exit Sub ErrorHandler : MsgBox "A workbook must contain at least one visible worksheet." , vbOKOnly, "Unable to Hide Worksheet" End Sub用VBA代码使多个工作表非常隐藏
如果你想设置 所有选定的纸张 要非常隐蔽,在活动工作簿(ActiveWindow)中逐一查看所有选定的工作表,并改变其 可见 财产,以 xlSheetVeryHidden .
Sub VeryHiddenSelectedSheets() Dim wks As Worksheet On Error GoTo ErrorHandler For Each wks In ActiveWindow.SelectedSheets wks.Visible = xlSheetVeryHidden Next Exit Sub ErrorHandler : MsgBox "A workbook must contain at least one visible worksheet. " , vbOKOnly, "Unable to Hide Worksheets" End Sub如何解除Excel中非常隐藏的工作表
现在你知道了如何在Excel中完全隐藏工作表,现在是时候谈谈如何查看非常隐藏的工作表了。
通过改变一个非常隐藏的工作表的 "可见 "属性来解除其隐藏状态
为了能够再次看到一个非常隐藏的工作表,你只需要改变其 可见 财产返回到 xlSheetVisible .
- 按Alt + F11打开Visual Basic编辑器。
- 在 VBAProject 窗口,选择你想取消隐藏的工作表。
- 在 财产 窗口,设置 可见 财产,以 -1 - xlSheetVisible .
完成了!
用VBA取消所有非常隐藏的工作表
如果你有相当多的非常隐蔽的工作表,而你想让它们再次全部可见,这个宏会很有效。
Sub UnhideVeryHiddenSheets() Dim wks As Worksheet For Each wks In Worksheets If wks.Visible = xlSheetVeryHidden Then wks.Visible = xlSheetVisible Next End Sub注意,这个宏只能取消隐藏 非常隐蔽的床单 如果你想完全显示所有隐藏的工作表,那么请使用下面的方法。
一次解开所有隐藏和非常隐藏的床单
要一次性显示活动工作簿中的所有隐藏工作表,你只需设置 可见 每个工作表的属性为 "真 "或 xlSheetVisible .
Sub UnhideAllSheets() Dim wks As Worksheet For Each wks In ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible Next wks End Sub如何使用Very Hidden Sheets的宏
要在你的Excel工作簿中插入上述任何一个宏,请执行这些常规步骤。
- 打开你要隐藏或取消隐藏工作表的工作簿。
- 按Alt + F11打开Visual Basic编辑器。
- 在左侧窗格中,右键单击 这本工作手册 并选择 插入 > 模块 从上下文菜单中选择。
- 将代码粘贴在代码窗口中。
- 按F5来运行宏。
为了保留宏,请务必将文件保存为支持宏的Excel工作簿(.xlsm)。 详细的步骤说明,请参见如何在Excel中插入和运行VBA代码。
或者,你可以下载我们的带宏的样本工作簿,直接从该工作簿中运行所需的宏。
该样本工作簿包含以下宏。
- 非常隐藏的活动表 - 使得一个活动的工作表非常隐蔽。
- 非常隐蔽的选择表(VeryHiddenSelectedSheets - 使得所有选定的工作表都非常隐蔽。
- 解除非常隐藏的表格 - 解除活动工作簿中所有非常隐藏的工作表。
- 取消隐藏所有表格 - 显示活动工作簿中所有隐藏的工作表(正常隐藏和非常隐藏)。
要在你的Excel中运行宏,你要做以下工作。
- 打开下载的工作簿,如果有提示,请启用宏。
- 打开你自己的工作簿。
- 在你的工作簿中,按Alt + F8,选择感兴趣的宏,并点击 运行 .
例如,这里你可以让所有被选中的工作表都非常隐蔽。
我希望这个简短的教程能让大家了解到Excel中非常隐蔽的工作表。 感谢大家的阅读,希望下周能在我们的博客上看到大家的身影!
供下载的工作手册样本
非常隐藏的表格宏(.xlsm文件)