VBA計數具有特定名稱（簡單）的工作表的數量

Question

我想計算工作簿中工作表的數量，然後從總數中減去特定的工作表。我錯過了什麼？這給了我一個對象錯誤：

wsCount = ThisWorkbook.Sheets.Count - ThisWorkbook.Sheets("Sheety1").Count - 
ThisWorkbook.Sheets("Sheety2").Count 

Answer 1

cpt = 0 
For Each ws In ActiveWorkbook.Worksheets 
    If ws.Name = "Sheety1" Or ws.Name = "Sheety2" Then 
     cpt = cpt + 1 
    Else 
     'Do nothing 
    End If 
Next 
wsCount = ThisWorkbook.Sheets.Count - cpt