Como listar todos os arquivos de uma pasta para uma planilha com VBA,

Veja como é fácil listar em uma planilha Excel todos os nomes dos arquivos de uma pasta qualquer de seu PC com a função "DIR" do VBA. Confira mais a respeito em nosso vídeo.

O nosso canal tem como objetivo ensinar Excel e VBA a internautas com pouco ou nenhum conhecimento sobre o assunto. VBA, ou Visual basic for Application, é uma linguagem de programação que automatiza qualquer tarefa em suas planilhas. Confira!

CÓDIGO DESTE VÍDEO:
Sub Codigo01()
Dim Lin As Integer
Dim Caminho As String, Nome_Arq As String

Lin = 1
Caminho = ThisWorkbook.Path & "\"
Nome_Arq = Dir(Caminho & "\*.txt")

Do While Nome_Arq MENOR MAIOR ""
Cells(Lin, 1) = Nome_Arq
Nome_Arq = Dir()
Lin = Lin + 1
Loop
End Sub

DOWNLOAD ARQUIVOS GRÁTIS:

PLAYLIST PERGUNTAS DOS INTERNAUTAS:

PLAYLIST DICAS RÁPIDAS:

PLAYLIST PROCEDIMENTOS:

PLAYLIST FORMULÁRIOS:

CURSO EXCEL VBA BÁSICO:

[wagnerlima]

Que bom que voltou Nilton. Obrigado pela aula.

[brito]

Excelente vídeo...
Vamos aproveitar este 2022.

[ronaldoramos]

Boa tarde vc poderia dar uma aula esplicando como eu faço
Eu tenho um combobox com 3 planilhas de trabalho
Eu gostaria ao escolher qual planilha
Pelo combibox e aparecer no meu listboox os meus trabalhos
As planilhas individuais obrigado

[Dieg]

Olá tudo bem ? Poderia dar uma ajuda pois quero que uma label no formulário que vai ficar aberto o tempo todo mude de cor em tempo real conforme o texto seja atualizado na planilha
Ex liberado na planilha a label muda
Para verde
Não liberado fica vermelha
A lógica com o If já fiz mas só funciona quando coloco no modo iniciar do formulário após isso não atualiza a cor da label quando mudo o resto na célula obrigada um bom dia