今天要和大家分享的是:ExcelVBA取消全部隐藏的工作表?
工具/原料
Excelvba
方法/步骤
1、首先打开数据表格需要将sheet1以外的表格进行全部隐藏,如下图所示:
2、然后按alt+f11快捷键,打开VBA代码界面,如下图所示:
3、插入模块,如下图所示:
4、然后在新的模块里输入如下代码:Sub打开全部隐藏工作表()DimiAs诔罨租磊IntegerFori=1ToSheets.CountSh髫潋啜缅eets(i).Visible=TrueNextiEndSub,如下图所示:
5、回到excel界面快捷键alt+f8打开宏执行对话框,如下图所示:
6、找到对应的命令,单击执行按钮,如下图所示:
7、即可看到隐藏的图表,全部显示出来,如下图所示: