How to get the list of sheet names of ms-excel?
Try using the following macro:
Sub ListWorkSheetNames()
For i = 1 To Sheets.Count
Range("A" & i) = Sheets(i).Name
Next i
End Sub
For me - works quite well.
(source)
To get the same as above but additionally with hyperlinks taking you to the sheet:
Sub ListWorkSheetNames()
For i = 1 To Sheets.Count
Range("A" & i) = "=HYPERLINK('" + Sheets(i).Name + "'!A1, """ + Sheets(i).Name + " "")"
Next i
End Sub