Esto es lo que me gustaría que hiciera la macro:

Ejecute una macro en cada hoja, excepto la hoja1 y la hoja2

dim rs as worksheet

para cada rs en hojas si rs.name = "Sheet1" u "Sheet2", luego rs.name = rs.range ("

Soy nuevo en VBA y sigo recibiendo el error 'siguiente sin para'. no estoy seguro de cómo seguir el ciclo for y la instrucción if. gracias por adelantado

            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