[Resolvido] Macro para listar planilhas da pasta de trabalho


#1

Boa noite pessoal!

Como criar uma rotina que me gere automaticamente o nome de todas as planilhas na minha pasta de trabalho uma abaixo da outra e que se atualize sempre que eu adicionar/excluir alguma planilha?

Exemplo, tenho um arquivo que tem as planilhas: RESUMO, 15-11-2018, 16-11-2018, 17-11-2018. Queria que aparecesse na planilha resumo nas células A1 à A4 por exemplo esses nomes. Empaquei porque as datas sempre mudam, a única fixa é a resumo.


#2

Problema resolvido com o seguinte código:

Sub GetSheets()
Dim j As Byte
For j = 1 To Sheets.Count
Cells(j, 1) = Sheets(j).Name
Next j
End Sub