Compartilhe!

Para listar todas as abas de uma planilha bastar usar o seguinte comando:

Sub ListaPlanilhas()   nplanilhas = Sheets.Count
  For n = 1 To nplanilhas
  Range("A" & n) = Sheets(n).Name
  Next n
End Sub

Caso queria esse arquivo, favor enviar um email para contato@exceleaccess.com solicitando.

Obrigado pela visita!

www.exceleaccess.com

contato@exceleaccess.com

www.exceleaccess.com

Compartilhe!

Excel – Listar todas as abas via VBA