Testar existência arquivo na pasta

Encontrar arquivo na pastaDesenvolva sistemas completos no Microsoft Access 2007. Clique aqui e conheça o curso de Access 2007 online.

Em alguns momentos é preciso saber se um determinado arquivo existe antes de tentar usa-lo.

Seja quando você vai chamar algum arquivo de informação ou quando é necessário procurar alguma informação em uma base de dados do Access.

Com o código a seguir, você pode descobrir se existe o arquivo na pasta. Este comando retorna o caminho da pasta, caso encontre o arquivo ou sequência vazia se não encontrar o arquivo.

Comando VBA testar existência de um arquivo

Dim stRetorno As string

stRetorno = Dir(“c:\pasta\arquivo.mdb”)

If stRetorno = “” Then

MsgBox “Arquivo: não existe”, vbOKOnly

End If

Onde stRetorno é a string que vai receber o resultado do comando DIR. É ela que deverá ser testada no comando if.

O você achou do comando para verificar existência de arquivo? Ele vai ser útil para você? Deixe seu comentário e compartilhe nas redes sociais!

Autor: Matheus Pellizzaro

Matheus é formado em sistemas de Informação pela UDESC, desenvolve sistemas e páginas de internet para empresas e pessoas físicas nas "horas vagas". Maiores detalhes em www.tecnozen.com.br