excel怎么一键取消所有隐藏(Excel怎么一键取消隐藏)

今年我们来聊点简单的,但是很常见的问题如何批量取消工作薄中,所有隐藏的工作表目前Excel自带的功能,无法实现批量,只能逐个取消,有兴趣的同学可以去WPS看看,听说可以

 

不过有很多MS OFFICE忠粉,如我,所以我们就来简单实现以下这个功能

 

先看效果:

excel怎么一键取消所有隐藏(Excel怎么一键取消隐藏)

 

点击按钮,显示出了所有隐藏

 

代码截图:

 

excel怎么一键取消所有隐藏(Excel怎么一键取消隐藏)

 

源码粘贴可用(建议收藏,关键时候可帮大忙):

‘作者:Excel办公实战-小易 ‘功能:过程名称很明白 ‘———————————— Sub 取消全部隐藏工作表() Dim ws As Worksheet ‘检查没一个工作表 For Each ws In ThisWorkbook.Worksheets ‘取消隐藏-可见 ws.Visible = xlSheetVisible ws.Visible = xlSheetVeryHidden ws.Visible = xlSheetHidden Next End Sub

 

 

扩展:如果想通过代码隐藏工作表,

那么可以只要把

ws.Visible = xlSheetVisible 修改为 ws.Visible = xlSheetHidden 或者 xlSheetVeryHidden

xlSheetVeryHidden 相对于hidden 更加安全,普通方法无法取消隐藏,必学在VBE中操作取消

小结:从实战出发,只是简单的几句代码,如何大量的隐藏工作表需要取消,可以大量节约我们的时间,以上代码可以直接复制粘贴使用!

 

本文来自作者:落落,不代表小新网立场!

转载请注明:https://www.xiaoxinys.cn/147475.html

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌抄袭侵权/违法违规的内容, 请联系我们举报,一经查实,本站将立刻删除。