Mega Code Archive

 
Categories / VisualBasic Script / Excel
 

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