|
1、按下Alt+F11组合键进入VBA编辑状态。
2、执行“视图→立即窗口”命令，打开“立即窗口”。
3、在“立即窗口”输入：?application.ThisWorkbook.Worksheets.Count
4、点击“回车”健。
上面几步是查询一下本工作簿有多少工作表。
5、输入：?sheets(1).Visible 点击“回车”
输入：?sheets(2).Visible 点击“回车”
输入：?sheets(3).Visible 点击“回车”
第5步是查询一下每张工作表的 Visible 属性值。“-1”表示工作表没有隐藏，“2”和“0”表示工作表是隐藏的。
6 、如果想显示某张隐藏的工作表，直接把这张工作表的属性值“2”更改为“-1”或者“True”。操作如下：
输入：sheets(2).Visible=True 点击“回车”，Sheet2便取消了隐藏。
或者：sheets(2).Visible=-1 点击“回车”， Sheet2便取消了隐藏。
输入：Sheets(3).Visible=True 点击“回车”，Sheet3便取消了隐藏。
或者：sheets(3).Visible=-1 点击“回车”， Sheet3便取消了隐藏。
第6步是通过更改Visible属性值达到取消工作表隐藏的目的。
|
