本文作者:office教程网

excel 批量取消隐藏工作表的两段VBA代码

office教程网 2023-11-10 21:20:31
后台-系统设置-扩展变量-手机广告位-内容正文顶部
摘要:  一个群友问到如何批量取消隐藏工作表。在一个excel工作薄里隐藏了十几张工作表,想将其取消隐藏,使用excel内置的功能:“格式——工作表——取消隐藏”,只能...

 一个群友问到如何批量取消隐藏工作表。在一个excel工作薄里隐藏了十几张工作表,想将其取消隐藏,使用excel内置的功能:“格式——工作表——取消隐藏”,只能逐张慢慢取消隐藏工作表,如何批量取消隐藏工作表呢?

  要解决批量取消隐藏工作表,就只能使用VBA代码完成。

  下面提供两端批量取消隐藏工作表的VBA代码,都可以实现。

批量取消隐藏工作表代码一:

excel 整列求和的公式写法,和使用状态栏实时预览excel一列求和结果

excel整列求和,多用于汇总一列数据的销量等等。如下面的数据,用excel一列求和来汇总。就上面这个A列整列求和,比如在B2输入公式:=SUM(A:A),回车即可完成一列求和。如果所有数据是固定

  按下"Alt F11"键,在打开的"Microsoft Bisual Basic"窗口中,选择"插入——模块".,复制下面的代码,按F5键运行,就完成了批量取消隐藏工作表。

Sub 批量取消隐藏工作表()
Dim i As Integer
For i = 1 To Worksheets.Count
Worksheets(i).Visible = True
Next
End Sub

批量取消隐藏工作表代码二:

Sub 批量取消隐藏工作表()
For Each AA In Sheets
AA.Visible = True
Next
End Sub

  两段代码使用任意一段都可以批量取消隐藏工作表。

excel 批量取消隐藏工作表的两段VBA代码的下载地址:
  • 本地下载

  • excel选取不重复值的四种方法

    excel取不重复值的方法真是多种多样,比如使用高级筛选、SQL、函数、VBA完成excel取不重复值。下面以一个例子来说明excel取不重复值的方法。excel取不重复值方法一:高级筛选A列姓名有重复的

    后台-系统设置-扩展变量-手机广告位-内容正文底部
    未经允许不得转载:

    作者:office教程网,原文地址:excel 批量取消隐藏工作表的两段VBA代码发布于2023-11-10 21:20:31
    转载或复制请以超链接形式并注明出处 演示站

    分享到:

    觉得文章有用就打赏一下文章作者

    支付宝扫一扫打赏

    微信扫一扫打赏

    留言与评论(共有 0 条评论)
       
    验证码: