// https://www.thesmallman.com/looping-through-worksheets Sub MovethroughWB1() 'Excel VBA looping procedure, loop excludes first tab on the left' Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets 'Start the VBA Loop. If ws.Index <> 1 Then 'Exclude the first sheet on the left from the procedure.n 'Perform the Action you wish. ws.Range("B10:B20").Interior.Color=vbCyan End If Next ws End Sub