|
前言今天讲一下工作表的隐藏与显示，批量隐藏非常简单，批量显示需要一点点VBA基础，不过看完今天的文章，相信你已经具备了一点点VBA的知识了。 1工作表隐藏工作表需要隐藏时，只要选中工作表下方的标签栏，右键，点击隐藏即可。 工作表选择有一下几种方式： 按住CTRL键，用鼠标点击多个工作表，可以实现多选 按住CTRL键，用鼠标点击已选中工作表，可以取消选中。 想取消已选中的全部工作表，可以点击其他任何一个非选中工作表即可。 按住SHIFT，用鼠标选取第一个和最后一个，可以实现连续工作表同时选中。 隐藏时，可以同时选中多个工作表，在任意选中的工作表标签栏上点击右键，选择隐藏即可。 2取消工作表隐藏取消工作表隐藏时，需要在标签栏上选中一个可见的工作表，右键，点击取消隐藏，此时，会弹出一个取消隐藏的对话框，用鼠标点击要取消的工作表，确定即可。 但是：取消工作表只能一个个取消，不支持多选。 前几天老崔就接到一个同事求助，解决了一个隐藏了100多个工作表的变态文件，几行代码轻松解决，核心代码只有一条。下面为解决方法： 首先ALT+F11，打开VBA编辑器 在工程窗口中，选中当前工作薄，点击“插入”菜单栏，插入“模块” 将下述代码拷贝到新插入的模块1中： Sub 取消隐藏工作表() For Each ws In Worksheets ws.Visible = True Next End Sub 将鼠标放在代码内的任何位置，单击工具栏上的运行按钮或F5，取消隐藏瞬间完成。 总结1、VBA编辑器的打开方式：ALT+F11 2、过程代码： SUB 名称() …… END SUB 3、循环代码： FOR EACH 元素 in 集合 …… NEXT 4、工作表显示代码： SHEETS("名称”).VISIBLE=TRUE 或 SHEETS(序号) .VISIBLE=TRUE 更多VBA代码请见： END |
|
|
