VBA:当提到另一张表时,它没有找到

时间:2016-06-17 18:48:24

标签: excel vba excel-vba loops

社区新手,请原谅任何错误。

使用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

1 个答案:

答案 0 :(得分:1)

更简单的方法来执行相同的过程(不会给你我猜的错误是索引错误的结果)

Dim Sh As Worksheet
For Each Sh In ActiveWorkbook.Worksheets
    If Sh.Name <> "Overview" Then
       MsgBox(Sh.Name)
    End If
Next Sh