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

  发布时间:2016-08-15 15:56:27   作者:佚名   我要评论
excel怎么使用vba一键隐藏所有工作表?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然后运行即可。

相关推荐:

Excel2016工作表该怎么隐藏?

excel怎么一次性显示多个隐藏的工作表?

excel编辑栏怎么不显示公式?excel隐藏编辑栏公式的方法

相关文章

  • excel怎么将表格中的美元转换为人民币?

    excel怎么将表格中的美元转换为人民币?excel表格中全是美元,想将美元全部转换成人民不,该怎么转换呢?下面我们就来看看详细的教程,需要的朋友可以参考下
    2016-08-14
  • excel vba编程在窗体上画微波炉

    这篇教程是向脚本之家介绍excel vba编程在窗体上画微波炉方法,方法很简单的,有需要的朋友可以参考本文,希望能对大家有所帮助
    2016-08-12
  • 利用excel vba编程在窗体上画手提电脑

    这篇教程主要是向脚本之家的朋友分享利用excel vba编程在窗体上画手提电脑方法,教程比较基础,适合新手来学习,推荐到脚本之家,喜欢的朋友可以参考本文哦
    2016-08-10
  • excel怎么利用vba函数给表格区域添加绿框?

    excel怎么利用vba函数给表格区域添加绿框?excel表格中有重要的数据,想将数据框起来更扎眼,该怎么做呢?下面我们就来看看详细的教程,需要的朋友可以参考下
    2016-08-10
  • excel怎么使用vba实现箱号换散鞋模板的功能?

    excel怎么使用vba实现箱号换散鞋模板的功能?经常需要将整箱的鞋子换成散鞋,该怎么换呢?今天我们就来看看使用excel制作散箱号换散鞋模板的教程,需要的朋友可以参考下
    2016-08-10
  • excel vba编程画一只小蜜蜂

    今天小编为大家分享excel vba编程画一只小蜜蜂方法,教程绘制出来的小蜜蜂非常不错,方法很简单,感兴趣的朋友可以参考本文,来看看吧
    2016-08-09
  • 利用excel vba编程在窗体上画椅子

    今天小编为大家分享利用excel vba编程在窗体上画椅子方法,教程比较不错,也很简单,适合新手来学习,推荐过来,来看看吧
    2016-08-05
  • excel表格怎么利用vba自动填充公式?

    excel表格怎么利用vba自动填充公式?excel表格中需要使公式计算,该怎么让表格自动填充公式呢?下面我们就来看看使用vba自动填充公式的教程,需要的朋友可以参考下
    2016-08-02
  • 利用excel vba编程在窗体上画一颗六角星

    今天小编为大家分享利用excel vba编程在窗体上画一颗六角星方法,教程比较不错,对于有兴趣的朋友可以参考本文,来看看吧
    2016-08-02
  • Excel VBA教程 Excel多个表格汇总的方法教程

    如果你每天的工作都是把分表格汇总到总表中,那你肯定需要下面我要教给你的这个:用VBA批量把每天的各种表格汇总成一张总表,再也不用每张表格的复制粘贴了
    2016-08-01

最新评论