Excel VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Excel
  4. Looping Through Worksheets in a Workbook
Sub WorksheetLoop() 
    Dim nIndex As Integer 
    For nIndex = 1 To ThisWorkbook.Worksheets.Count 
        Debug.Print ThisWorkbook.Worksheets(nIndex).Name 
    Next 
End Sub