У меня есть файл Excel, в котором много листов. Как я могу получить список имен листов MS-Excel?
(PS: офис Mac-версия.)
У меня есть файл Excel, в котором много листов. Как я могу получить список имен листов MS-Excel?
(PS: офис Mac-версия.)
Попробуйте использовать следующий макрос:
Sub ListWorkSheetNames()
For i = 1 To Sheets.Count
Range("A" & i) = Sheets(i).Name
Next i
End Sub
Для меня - работает довольно хорошо.
(источник)
Чтобы получить то же, что и выше, но дополнительно с гиперссылками, которые ведут на лист:
Sub ListWorkSheetNames()
For i = 1 To Sheets.Count
Range("A" & i) = "=HYPERLINK('" + Sheets(i).Name + "'!A1, """ + Sheets(i).Name + " "")"
Next i
End Sub