excel怎么使用vba一键隐藏所有工作表?

excel中使用vba一键隐藏所有工作表

1、首先我们打开一个工作样表作为例子。

2、使用alt+f11组合键打开vbe编辑器,新建一个模块,在模块编辑窗中输入以下代码:

Option Explicit

Sub 隐藏()

Dim i As Integer

For i = 1 To Sheets.Count

If Sheets(i).Name <> "源数据" Then

   Sheets(i).Visible = 0

End If

Next x

End Sub

3、解读这段代码首先是要了解工作表的名称规则是默认的以数字顺序递增,按工作表的顺序依次是sheets1、sheets2、……直到最末尾一个工作表。因此我们这里定义一个for循环,起始值为1,终值为工作表数

4、接着我们对工作表名做判断。工作表出了下标值,也就是上步提到的顺序命名,还可以自定义名称,也就是我们这里写的"源数据"。<>大于小于判断符为不等于。

5、visible属性是可视属性,作为表格对象的属性即是可视或隐藏。这里写做0即是隐藏,我们可以用更直观的写法false。

6、制作一个按钮并指定这个宏,我们运行一下,可以看到除了源数据工作表外,其他的工作表都隐藏起来了,如果需要回复,只需要将宏代码中visible的属性值0修改为1或者true然后运行即可。

(0)

相关推荐

  • Excel如何一键取消所有隐藏的工作表?

    今天要和大家分享的是:Excel如何一键取消所有隐藏的工作表? 操作方法 01 首先打开数据表格,如下图所示: 02 然后取消隐藏时会发现只能一次取消一个工作表,如下图所示: 03 找到方方格子插件, ...

  • excel如何批量取消隐藏的工作表

    大家都知道,在平时使用过程中批量隐藏工作表的方法是使用键盘CTRL和鼠标选取需要隐藏的工作表标签,让后再使用鼠标右键隐藏功能来达到隐藏工作表的目的,但是要取消,excel就没有这样的功能了,大家就要一 ...

  • 电脑端excel如何隐藏工作表?如何将被隐藏的工作表显示出来?

    如果我们需要对信息进行整理,execl表格是我们的优先选择.今天小编跟大家分享一下电脑端excel如何隐藏工作表,如何将被隐藏的工作表显示出来.具体如下:1. 首先我们打开电脑中的一份excel表格. ...

  • Excel怎么隐藏/显示工作表

    Excel是现在十分常用的文件类型之一,每个文档都支持多个工作表,有些用户想知道怎么隐藏/显示工作表,接下来小编就给大家介绍一下具体的操作步骤.具体如下:1. 首先第一步先打开电脑中的Excel文档, ...

  • 怎样批量取消隐藏的工作表(excel如何取消隐藏的工作表)

    今天跟大家分享一下Excel如何批量隐藏多个工作表1.如下图工作簿中含有多个工作表,现在我们想要将1模以外的工作表全部隐藏起来.2.首先我们点击下图选项(Excel工具箱,百度即可了解详细的下载安装信 ...

  • 如何在Excel2007隐藏显示工作表

    Excel2007如何隐藏显示工作表呢?在某些情况下,您可能希望隐藏一个或多个工作衰.如果不希望其他人看见一个表,或者自己不想看见它,隐藏工作表就会非常有用.当工作表被隐藏时,它的标签也会被隐藏.不能 ...

  • 在Excel中如何用IF函数清除工作表中的0?

    if函数在Excel表格中十分重要,是我们日常办公使用频率很高的一个函数,其语法格式为:if(条件表达式,表达式为真时执行,表达式为假时执行),那么那么在Excel中如何用IF函数清除工作表中的0?下 ...

  • excel怎么防止别人删除或增加工作表?

    excel怎么防止别人删除或增加工作表?很多朋友都不是很清楚,其实操作步骤很简单,下面就为大家详细介绍一下,来看看吧! 步骤 1.首先打开excel表格. 2.点击审阅-保护工作簿. 3.调出对话框, ...

  • 把Excel表格完整复制到另一个工作表的方法

    excel是一款电子表格软件.直观的界面.出色的计算功能和图表工具,使它成为最流行的个人计算机数据处理软件.然而,仍然有不少用户对于一些操作不太熟悉,他们问道:怎样才能把Excel中一个表格完整复制到 ...