Run A Macro on Each Sheet Except Sheet1 and Sheet2

Question

Here\'s what i\'d like the macro to do:

Run a macro on every sheet except sheet1 and sheet2

dim rs as worksheet

for each rs in sheets

Answer 1

Small mixup, try :

Dim rs As Worksheet

For Each rs In ThisWorkbook.Worksheets
   If rs.Name <> "Sheet1" And rs.Name <> "Sheet2" Then
        rs.Name = rs.Range("N2").Value 'rename sheet base on vendor name field
   End If
Next rs

End Sub