应用场景
下图工作簿中一共有七张工作表,多表格隐藏了怎么恢复出来,目前只显示了第一张工作表“表1”,还有六张工作表“表2”至“表7”被隐藏。这篇文章就跟大家分享如何利用VBA代码将隐藏的六张工作表批量显示出来。
操作步骤
表格取消隐藏方法 先用excel打开文件,然后点击如上图显示的位置,鼠标右键选择取消隐藏即可,这样之前隐藏的整个工作表就能恢复了哈
3.在模块1(代码)编辑窗口中输入如下代码:
excel表格隐藏后直接用鼠标拖出来即可。1、电脑打开Excel表格,选中AB两个表格,点击鼠标右键选择隐藏。2、隐藏后,直接把鼠标放到字母栏隐藏的位置,就会出现一个双向箭头。3、直接把表格拖出来就可以了。
Sub 取消工作表隐藏()
Dim sht As Worksheet
'定义变量
For Each sht In Worksheets
4、想要恢复被隐藏的文件,选中G和I列,点击鼠标右键,弹出的对话框可以看到“取消隐藏”的图标,点击一下就可以恢复原来被隐藏的部分了。5、除了隐藏文件中的列信息,也可以隐藏行当中的数据,具体的操作方法和列隐藏的方法。
'循环工作簿里的每一个工作表
1、因为我们知道了隐藏单元格在L列和V列之间,所以将鼠标放置到L列和V列的交界处让其呈现下图所示的形状。2、按住鼠标左键往右拖动列宽,如下图所示,隐藏单元格恢复了,完成。
sht.Visible = xlSheetVisible
'将工作表的状态设置为非隐藏
Next
1、首先,让我们在电脑桌面打开需要进行的excel表格。2、然后,我们一起点击上方工具栏靠右面的格式按键。3、其次,我们来选择可见性中的隐藏和取消隐藏按键,点击取消隐藏工作表。4、接下来,我们一起对鼠标左键点击选择取消。
End Sub