如何用VBA隐藏和取消隐藏工作表

1、在工作表界面按下组合快捷键Alt+F11或者右键单击任意一个工作表标签，在弹出的右键快捷菜单单击“查看代码”进入VBA编辑环境，如下图所示：

3、如果要将某个工作表取消隐藏可以使用如下的代码Sub xyf() Sheet1.Visible = xlSheetVisibleEnd Sub通过修改工作表对象的Visible属性可以在隐藏和取消隐藏之间切换。

4、如果需要批量隐藏或者取消隐藏多个工作表可以使用如下的代码Sub xyf() '定义一个工作表变量对象 Dim oWS As Worksheet For Each oWS In Excel.ThisWorkbook.Worksheets '批量取消隐藏 oWS.Visible = xlSheetVisible NextEnd Sub通过For Each 。。。Next的循环遍历每一个工作表，通过对每一个工作表的Visible属性的设置可以实现批量取消隐藏或者批量隐藏工作表。如下图所示

6、通过以上的步骤的学习，大家可以掌握快捷的批量取消隐藏和隐藏工作表的技巧。