Localizar arquivos em um diretorio

[Bismarck Rodrigues 0]

Eu tenho a necessidade de localizar arquivos PDF em um diretório em que as pastas são divididas por produto>ano>mes. Essas informações eu tenho planilhada, porem gostaria de localizar nesse diretório esses arquivos.

Parte do nome do arquivo eu também tenho planilhado.

alguém pode me ajudar?

[Alyson Ronnan Martins 0]

Boa noite @Bismarck Rodrigues

você pode usar o dir(...) para tentar localizar o arquivo

nArquivo = Sheets("Plan1").cells(1, "A").valeu

IF Dir(nArquivo) <> "" Then
Msgbox "Arquivo encontrado"
Else 
Msgbox "Arquivo não encontrado"
End If 

É mais ou menos isso?