none
Criar uma lista em uma planilha com os nomes de todas as pastas em um diretório RRS feed

  • Pergunta

  • Caros, boa tarde.

    Preciso fazer o seguinte: em uma planilha qualquer quero montar uma lista com os nomes de pastas que estão em um determinado diretório.

    Por exemplo: o diretório "C:\Arquivos" possui três pastas (Arq1, Arq2 e Arq3). Na planilha, quero que uma macro obtenha o nome das três pastas e preencha a célula A1 com "Arq1", a célula A2 com "Arq2" e a célula A3 com "Arq3". Quero que a macro obtenha esses valores (nomes das pastas) automaticamente e independentemente do número de pastas no diretório "C:\Arquivos", ou seja, de forma relativa.

    Há algum código simples para isso, pois sou iniciante em VBA?

    Obrigado pela ajuda!

    quarta-feira, 29 de fevereiro de 2012 20:18

Respostas

  • O uso do comando Dir

    Lhe ajuda na solução do seu problema, basicamente funcionaria assim

    arq = dir("C:\Arquivos")
    
    i =1
    
    do while arq <> ""
    
    cells(i,1) = arq
    
    arq = dir()
    
    i = i+1
    
    loop

    mas de uma aprofundada no comando, que pode ser feito muito mais coisa

    Abrç

    • Marcado como Resposta correasan quinta-feira, 1 de março de 2012 14:51
    quarta-feira, 29 de fevereiro de 2012 22:55