G Guest Oct 7, 2006 #1 Is there a sinple way - or a function - to go thru the list of tabs and extract their names? Thanks, Stefano
Is there a sinple way - or a function - to go thru the list of tabs and extract their names? Thanks, Stefano
G Gord Dibben Oct 7, 2006 #2 Private Sub ListSheets() 'list of sheet names starting at A1 Dim rng As Range Dim i As Integer Set rng = Range("A1") For Each Sheet In ActiveWorkbook.Sheets rng.Offset(i, 0).Value = Sheet.Name i = i + 1 Next Sheet End Sub Gord Dibben MS Excel MVP
Private Sub ListSheets() 'list of sheet names starting at A1 Dim rng As Range Dim i As Integer Set rng = Range("A1") For Each Sheet In ActiveWorkbook.Sheets rng.Offset(i, 0).Value = Sheet.Name i = i + 1 Next Sheet End Sub Gord Dibben MS Excel MVP