macor code

Hello,

here is something to get you started. This code loops through all worksheets in the current workbook and pops up a message with the worksheet name.

Sub LoopWorksheets()
Dim ws As Worksheet

For Each ws In ThisWorkbook.Worksheets
' do something
    MsgBox ws.Name
Next ws
End Sub

does that help?