 |
|
||||
Você está aqui: Excel VBA ::: Dicas & Truques ::: Pastas (Workbooks) |
Como listar todas as pastas do Excel abertas na seção atual usando Excel VBA - Visual Basic for Applications para iniciantesQuantidade de visualizações: 329 vezes |
|
Nesta dica mostrarei como podemos usar a coleção Application.Workbooks para listar todas as pastas abertas na seção atual do Excel. Lembre-se de que um Workbook representa uma pasta de trabalho e que Application representa a instância atual do Excel. Veja como usamos um laço For Each para listar cada uma das pastas e exibir o seu nome nas células da planilha ativa. Aqui o nome da minha planilha é "Planilha1". Tenha a certeza de ajustar para o nome da sua planilha antes de rodar o exemplo. Veja o código VBA completo:
' Procedimento usado para listar todas as pastas (Workbook) abertas
' na seção atual do Excel
Sub ListarTodasPastas()
' variáveis usadas na resolução do problema
Dim pasta As Workbook
Dim nomePasta As String
Dim contador As Integer
' vamos inicializar o contador em 2 para acessarmos
' a segunda linha da planilha atual
contador = 2
' vamos exibir a mensagem informativa
......Ao executar este código VBA nós teremos um resultado parecido com: Nomes das pastas abertas Pasta1 Pasta3 |
 Link para compartilhar na Internet ou com seus amigos: |
Veja mais Dicas e truques de Excel VBA |
Dicas e truques de outras linguagens |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
|
1º lugar: Java |
