SynTax Issues for Clearing a Specific Sheet

[Guzzlr]

Sub Clear_Eng_1()
Dim sht As Worksheets
For Each sht In ActiveWorkbook.Worksheets
    If (sht.Name <> "ECD") And (sht.Name <> "Revisions") Then
    sht.Activate
        With Range("A7:AV3000")
            .Clear
            .NumberFormat = "General"
            .Interior.Pattern = xlNone
            Range("A8").Interior.ColorIndex = 6
            Range("A7") = "Project Tags"
            Range("B8").Interior.ColorIndex = 4
'            Range("B7") = "MES_Data"
'            .ColumnWidth = 8.14
'            Columns("A:B").EntireColumn.AutoFit
        End With
    End If
Next sht
End Sub

Hello All,
I have a sheet in a Workbook named "REV Eng 1"
I have several other tabs.
I wish to clear only REV Eng 1 sheet, however, when I run the above code, I get a mismatch error on line: For Each sht In ActiveWorkbook.Worksheets.
What is my syntax error?

Thanks for the help
excel 2013

 

[V_Malkoti]

Change type of sht variable to refer to a single sheet - Worksheet is a single sheet, Worksheets is a collection.

Dim sht as Worksheet[COLOR=#ff0000][B]s[/B][/COLOR]

 

[Guzzlr]

Dim sht as Worksheet[COLOR=#ff0000][B]s[/B][/COLOR]

Got it..Thanks
Working Correctly now

 

[Guzzlr]

Dim sht As Worksheet
For Each sht In ActiveWorkbook.Worksheets

So getting back to this, Worksheet vs Worksheets continues to be confusing for me.
If Worksheet is for a single sheet, then why in the second line of code, I use Worksheets, not Work sheet, since the code will search all Worksheets, but only work one at a time?
Seems I would use: For Each sht In ActiveWorkbook.Worksheet, not ActiveWorkbook.Worksheets.

Thanks for the help

 

[V_Malkoti]

For variable declaration, you need to write Worksheet (singular) - the variable needs to refer to only one worksheet at a time in the loop.

For the loop, you need to write ActiveWorkbook.Worksheets (plural) to refer to the collection of all worksheets in the workbook. The loop then iterates over all those sheets, assigning them to variable sht one sheet in each iteration.

 

[Guzzlr]

Ahhh...didn't look at it thatway.
Thanks for the help