社区新手,请原谅任何错误。
使用VBA我试图遍历excel中的某些工作表(稍后会添加操作)。 然而,当SH = 2时,它在第二行遇到40036错误,我无法解释。 也许别人可以吗? (顺便说一下,工作簿目前有5张)
For Sh = 1 To ActiveWorkbook.Worksheets.Count
If ActiveWorkbook.Worksheets(Sh).Name <> "Overview" Then
MsgBox ActiveWorkbook.Worksheets(Sh).Name
End If
Next
答案 0 :(得分:1)
更简单的方法来执行相同的过程(不会给你我猜的错误是索引错误的结果)
Dim Sh As Worksheet
For Each Sh In ActiveWorkbook.Worksheets
If Sh.Name <> "Overview" Then
MsgBox(Sh.Name)
End If
Next Sh