vba代码怎样隐藏工作簿_java

当前位置：网站建设 > 技术支持

资料来源：网络整理时间：2023/3/9 5:04:25 共计：3615 浏览

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然后运行即可

版权说明：
本网站凡注明“广州京杭原创”的皆为本站原创文章，如需转载请注明出处！
本网转载皆注明出处，遵循行业规范，如发现作品内容版权或其它问题的，请与我们联系处理！
欢迎扫描右侧微信二维码与我们联系。