今年我们谈谈简单的事吧。但是常见的问题是如何大量取消工作簿,所有隐藏的工作表都是目前Excel拥有的功能,无法实现大量,一次可以取消一个,有兴趣的同学可以去WPS看看,听说可以。(*译者注:译者注:译者注:译者注)
但是有很多和我一样的MS OFFICE忠粉。所以,让我们简单地实现这个功能。
首先查看效果:
单击按钮可显示所有隐藏
代码屏幕截图:
可以使用源粘贴(推荐的集合,重要的话会有很大帮助):
作者:excel办公室实战-小伊
功能:流程名称明确
-
取消隐藏所有Sub工作表()
Dim ws as工作表
没有检查工作表
For Each ws In T
取消隐藏-显示
Ws。Visible=xlSheetVisible
Ws。Visible=xlSheetVeryHidden
Ws。Visible=xlSheetHidden
next
End Sub
。
扩展:通过代码隐藏工作表的步骤
那就这样吧
Ws。Visible=xlSheetVisible为ws。更改为Visible=xlSheetHidden或xlSheetVeryHidden
XlSheetVeryHidden比Hidden安全。不能取消隐藏常规方法。必须在VBE中学习取消操作
摘要:从实战出发,只是简单的几句代码,如何取消大量隐藏的工作表,大大节省了我们的时间。上面的代码可以直接复制粘贴!