遍历工作表的方法
在工作中，经常需要遍历工作表，这里展示最基本的功能，查询工作表的个数，其余功能大同小异：
复制代码
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19#方法一 Sub test() Dim i As Integer Dim s As Integer For i = Worksheets.Count To 1 Step -1 s = s + 1 Next MsgBox "共有" & s & "张表" End Sub #方法二 Sub test1() Dim sht As Worksheet Dim s As Integer For Each sht In Worksheets s = s + 1 Next MsgBox "共有" & s & "张表" End Sub
最后
以上就是糊涂板凳最近收集整理的关于VBA-遍历工作表的方法遍历工作表的方法的全部内容，更多相关VBA-遍历工作表内容请搜索靠谱客的其他文章。
本图文内容来源于网友提供，作为学习参考使用，或来自网络收集整理，版权属于原作者所有。
发表评论 取消回复