Sub test()
Dim sh As Object
For Each sh In ActiveWorkbook.Sheets
MsgBox sh.Name
Next
End Sub

HTH. Best wishes Harald

"jerry chapman" skrev i melding
m...
How can I find the sheet names for an Excel program, by using a macro?