您的位置: 主页 > Excel教程 > Excel基础 >

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

时间:2016-10-07 10:00 来源:Word教程网 阅读:报告错误

excel怎么使用vba一键隐藏所有工作表?excel中很多工作表机密性比较大,想要隐藏起来,该怎么隐藏呢?一个一个隐藏太慢,下面我们就来看看使用vba一键隐藏所有工作表的详细教程,需要的朋友可以参考下

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

软件名称:Excel2003绿色版 EXCEL2003精简绿色版 (附excel2003绿色工具)软件大小:13.3MB更新时间:2012-06-19

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

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

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

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

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

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

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

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

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

相关推荐:

Excel2016工作表该怎么隐藏?

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

    最新评论

    • 昵称:
    • 验证码:点击我更换图片
    • Word

    • Excel

    • PowerPoint

    Word2003视频教程

    Word2003视频教程

    《全集共50课》分别有基础入门和高级两部教程,让你从零开始学起,从菜鸟变成高手[详情]

    Word2007视频教程

    Word2007视频教程

    《全集共43课》从Word发展历史到文档操作应用到打印,教程风趣幽默通俗易懂[详情]

    Word2010视频教程

    Word2010视频教程

    《全集共47课》由微软官方提供的视频教程,详细讲解了Word2010的新功能[详情]

    Excel2003视频教程

    Excel2003视频教程

    《全集共65课》详细讲解了Excel表格的基础操作与图表、图形、数据、打印等[详情]

    Excel2007视频教程

    Excel2007视频教程

    《全集共36课》从Excel的初步了解到表格透视图表制作和函数公式应用[详情]

    Excel2010视频教程

    Excel2010视频教程

    《全集共22课》Excel2010最新功能介绍和使用,还在不断更新,尽情关注[详情]

    PowerPoint2003视频教程

    PowerPoint2003视频教程

    《全集共22课》PowerPoint软件的介绍和应用每篇都讲解了多个功能的使用[详情]

    PowerPoint2007视频教程

    PowerPoint2007视频教程

    《全集共29课》不会制作幻灯片不用担心,本篇视频教程详细讲解幻灯片制作和动画制作[详情]

    PowerPoint2010视频教程

    PowerPoint2010视频教程

    《全集共29课》新版本的PPT中增添了许多意想不到的功能,让你设计幻灯片时更加轻松[详情]

    Word教程网-最近更新-网站地图-RSS地图-意见反馈 - 粤ICP备14012962号-3