Excel Listar os arquivos após determinada data.

[GENECIOFICIAL]

Boa tarde!

 

Com o windows 10.

Considerando que estou com inúmeros arquivos no HD externo, quero listar todos os arquivos após a data 15/03/2022, existe comando para o recurso?

 

Grato - Geneci.

[Midori]

@GENECIOFICIAL Com macro é possível listar as unidades ativas e a partir de cada fazer a busca com base na data (modificação, último acesso ou criação). Se os arquivos ficam na raiz ou no mesmo diretório será mais fácil listar.

[Edson Luiz Branco]

19 horas atrás, GENECIOFICIAL disse:

Com o windows 10.

 

Se você quer apenas verificar os arquivos no próprio Windows Explorer (sem salvar numa lista), estando na pasta raiz de seu HD externo, entre na caixa de pesquisa (canto sup. direito) e digite:

 

DataDeModificação:>=15/03/2022

 

Ou, alternativamente,:

 

System.DateModified:>=15/03/2022

 

-------------------

Quando a pesquisa é mais complexa eu gosto muito de usar o Everything da VoidTools, um aplicativo pequeno e gratuito, muito rápido e poderosíssimo para pesquisar arquivos no PC. A lista pode ser gerada nele mesmo.

[GENECIOFICIAL]

@MidoriBom dia! Fiquei interessado em aprender, por favor pode disponibilizar o código.

 

Grato. 

[Midori]

@GENECIOFICIAL No código considerei a unidade D para listar na coluna um o caminho e na dois a data doS arquivos na raiz, veja se é isso,

 

Sub ListarArquivos()
    Dim Arquivo As String
    Dim Linha   As Long
    
    Arquivo = Dir("D:")
    
    While Arquivo <> ""
        Linha = Linha + 1
        Cells(Linha, 1) = Arquivo
        Cells(Linha, 2) = FileDateTime(Arquivo)
        Arquivo = Dir
    Wend
End Sub

 

Para pegar uma data e extensão específica é só colocar a condicional.