成语| 古诗大全| 扒知识| 扒知识繁体

当前位置:首页 > 趣味生活

excel工作表批量取消隐藏

Q1:excel2013如何批量取消隐藏工作表?

第一步、打开你的工作簿(自然,这个工作簿隐藏了很多个工作表的,你想一次性显示他们)。
第二步、按ALT+F11(或者点击工具-宏-Visual Basic编辑器),出现vb编辑器界面。看左边,有两个框里都有英文字母,看上边一个框里(下面的那个框框不管它)。拉动滚动条,看这个框的最上边,就是你当前文件的名称,实际它的下面就是若干个工作表的名称。
第三步、随意双击一个工作表,就会在右边黑乎乎的窗口里出现一个小窗口。这个窗口的标题就是你的文件名。我们现在就要在这个小窗口里写段代码。写什么呢?看第四步。
第四步、在这个窗口的空白处输入一组代码。代码如下:复制进去即可
Sub quxiao()
For Each i In Sheets
i.Visible = -1
Next
End Sub
第五步、Alt+F11回到Excel ,
第六步、Alt+F8,找到quxiao宏,选中,点击运行,ok,都显示了,保存一下即可。

Q2:excel中如何批量取消隐藏的工作表

打开VB编辑器,将下面代码复制进去,执行即可。
Sub UnhideAllSheets()
For Each Sheet In ActiveWorkbook.Sheets
Sheet.Visible = True
Next
End Sub

Q3:excel中隐藏的多个工作表怎么快速取消隐藏?

使用VBA
按ALT+F11进入VBA界面,按Alt+i+m插入模块
粘贴下面的代码后按F5即可取消所有工作表的隐藏。
Sub allvisible()
Dim s As Worksheet
For Each s In ThisWorkbook.Worksheets
s.Visible = xlSheetVisible
Next s
End Sub

Q4:Excel如何批量取消隐藏,即让整个工作表里的(表格的 行列)取消隐藏

Ctrl+A再右键取消隐藏就行了。

Q5:excel中怎样批量取消隐藏工作表?

在工作表标签上单击右键
查找代码
代码窗口粘贴下面的VBA代码
sub 取消隐藏
for each sh in worksheets
sh.visible=true
next
end sub
然后按F5执行代码

猜你喜欢

更多