概述
遍历工作表的方法
在工作中，经常需要遍历工作表，这里展示最基本的功能，查询工作表的个数，其余功能大同小异：
#方法一
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-遍历工作表的方法遍历工作表的方法所遇到的程序开发问题。
如果觉得靠谱客网站的内容还不错，欢迎将靠谱客网站推荐给程序员好友。
本图文内容来源于网友提供，作为学习参考使用，或来自网络收集整理，版权属于原作者所有。
发表评论 取消回复