1、打开含有多个工作表的Excel表格,如下图所示

3、编写代码:Sub 鱼木混猪()For Each s In Sheetss.Vi衡痕贤伎sible = 0NextEnd Sub代码的作用是将所有可能隐藏的工作表都隐藏,如下图所示。

5、此时,会出现一个错误警告,因为无法隐藏全部工作表,故点击确定,忽略即可。回到Excel,可以看到除了剩余的一个工作表,其余都隐藏了,如下图所示。

时间:2024-10-12 18:17:40
1、打开含有多个工作表的Excel表格,如下图所示
3、编写代码:Sub 鱼木混猪()For Each s In Sheetss.Vi衡痕贤伎sible = 0NextEnd Sub代码的作用是将所有可能隐藏的工作表都隐藏,如下图所示。
5、此时,会出现一个错误警告,因为无法隐藏全部工作表,故点击确定,忽略即可。回到Excel,可以看到除了剩余的一个工作表,其余都隐藏了,如下图所示。