Macro que lista todas as abas de um Excel
Olá, Programadores Excel VBA! Hoje vou mostrar para vocês um código VBA que lista todas as abas de um Arquivo Excel.
Este código é bem simples, e independente do número de abas que existam dentro do arquivo Excel, o VBA consegue listar todos os nomes em um espaço de células pré determinado.
Portanto, uma das macros com esse código que tenho por aqui é assim:
Código VBA
Sub Listar_Abas() Dim WS_Count As Integer Dim x1 As Integer WS_Count = ActiveWorkbook.Worksheets.Count °PRÓXIMA_ABA = 16 'Atualizando relação de abas' For x1 = 1 To WS_Count Sheets(x1).Select °ABA_ATUAL = ActiveSheet.Name Sheets("Configurações Gerais").Cells(°PRÓXIMA_ABA, 2) = °ABA_ATUAL °PRÓXIMA_ABA = °PRÓXIMA_ABA + 1 Next x1 End Sub
Explicando o Código VBA
Sobre o código, note que WS_Count recebe ActiveWorkbook.Worksheets.Count, que conta o número de abas dentro do Arquivo Excel.
Com isso, o Loop indo de 1 até WS_COUNT percorre todas as abas do arquivo e cola os nomes no intervalo pré determinado da aba “Configurações Gerais”, com início na linha 16.
Resultado: Lista de Abas
Então, veja como ficou a aba “Configurações Gerais” depois que eu rodei a macro:
Com isso, as abas que compõe este arquivo são “Vendas”, “Estoque”, “DRE”, “Balanço Patrimonial”, “Índices e Liquidez” e “Ciclo Econômico”.
Conclusão
Portanto, listar as abas em um intervalo pré determinado através do Excel VBA pode ser importante como complemento de outras macros ou para fórmulas específicas já vinculadas a essas células, como através do uso da fórmula INDIRETO.
Além disso, uma macro que lista abas do Excel também pode servir de apoio para a criação de Menu, mas também com o complemento de hiperlinks sendo gerados automaticamente através de outro código VBA.
+ Saiba como abrir um arquivo através do Excel VBA
+ Saiba como enviar imagem via Outlook por Excel VBA
+ Saiba como selecionar um arquivo através do Excel VBA
Por fim, um sistema em Excel criado pela CTRL2 geralmente tem essa e mais várias macros que oferecem segurança e fácil navegabilidade aos usuários.
Por exemplo, o Espelho de Vendas desenvolvido para a Lavvi Incorporações foi um projeto simples, com execução em apenas uma semana e que combinava macros de importação e exportação de dados. O Projeto foi um grande sucesso que facilitou o processo de vendas no momento do lançamento de um empreendimento.
Então, se precisar de qualquer ajuda com os arquivos de sua empresa, entre em contato conosco!
Abraços!