VBA如何隐藏工作表？

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

2、按下Alt+F11组合键，打开VBA编辑界面，点击左侧任意工作表，出现右侧空白的代码编辑区，如下图所示。

3、编写代码：

Sub 鱼木混猪()

For Each s In Sheets

s.Visible = 0

Next

End Sub

代码的作用是将所有可能隐藏的工作表都隐藏，如下图所示。

4、将光标放在代码中间，点击“运行子程序”，如下图所示。

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

1、1.打开Excel表格；

2.按下Alt+F11；

3.输入代码，主要代码为：

For Each s In Sheets

s.Visible = 0

4.点击“运行子程序”；

5.在警告弹出点击确定，回到Excel可以看到除一个工作表外都隐藏了。