Language Basics VisualBasic Script

Sub WorksheetLoop2() 
    Dim ws As Worksheet 
    For Each ws In ThisWorkbook.Worksheets 
        Debug.Print ws.Name 
    Next 
End Sub