Aqui está o que eu gostaria que a macro fizesse:

Execute uma macro em todas as planilhas, exceto a plan1 e a plan2

dim rs as worksheet

para cada rs em planilhas se rs.name = "Plan1" ou "Plan2", em seguida, rs mais rs.name = rs.range ("

Eu sou novo no VBA e continuo recebendo um erro 'next without for'. não sei como seguir o loop for e a instrução if. desde já, obrigado

            Dim rs As Worksheet

            For Each rs In Sheets
               If rs.Name = "sheet1" Or "sheet2" Then
            Next ws
                Else: rs.Name = rs.Range("N2") 'rename sheet base on vendor name field

               End If
            Next rs