Como obter a lista de nomes de planilhas do ms-excel?

Question

Eu tenho um arquivo Excel que contém muitas planilhas. Como posso obter uma lista de nomes de planilhas do MS-Excel?

(PS: O escritório é versão mac.)

Answer 1

Tente usar a seguinte macro:

Sub ListWorkSheetNames()

For i = 1 To Sheets.Count
Range("A" & i) = Sheets(i).Name
Next i

End Sub

Para mim - funciona muito bem.

(fonte)

Answer 2

Para obter o mesmo que acima, mas adicionalmente com hiperlinks que levam você à planilha:

Sub ListWorkSheetNames()

For i = 1 To Sheets.Count
Range("A" & i) = "=HYPERLINK('" + Sheets(i).Name + "'!A1, """ + Sheets(i).Name + " "")"
Next i

End Sub