Abrir arquivos de uma pasta.

Pessoal, boa tarde!

Como posso abrir todos arquivos de uma determinada pasta?

Obrigado pela ajuda!

abrir todos de uma só vez? Isso é meio complicado para o próprio pc...
seja mais específico, por favor...

Pois é, mas desejo abrir todos arquivos que se encontrar na minha pasta temp, esse serão todos pdf's de um campo anexo... Tem como faze-lo?

Deixa eu entender melhor o resultado final.
Qual o objetivo de abrir todos de uma vez?
Você quer anexa-loas automaticamente é isso?

Não, eles já estão no campo anexo só preciso criar um botão no relatório pois, caso eu queira abrir esse arquivos do campo em anexo eles possa ser feito sem ter que abrir um por um no relatorio... Resumindo quando clicar no botão todos os anexos dos campos vão para uma pasta temp (já conseguir fazer isso), depois abra um a um dos arquivos desta pasta... Simples né!?! Não to conseguir é abrir esse arquivos na pasta temp...

Poste seu banco com os objetos envolventes e nos informe onde estão cada um controle que usa.

Com o banco aqui, vou pensar melhor em algo...

Eu só gostaria de uma função que realizasse a abertura dos arquivos... já ler que tem como listar os arquivos do diretorio... gostaria de abri-los é só... Obrigado!!

Amigo é simples sim. Adapte ao seu gosto.

Código:

Dim Caminho As String
Dim Arquivo As String

Arquivo = Dir("CaminhoCompleto\*.*")
Caminho = "CaminhoCompleto"

Do Until Arquivo = ""
     Application.FollowHyperlink Caminho & "\" & Arquivo, , True
     Arquivo = Dir()
Loop

Obrigado Marcelo!!!

Conseguir resolver meu probleminha!!!

Obrigado mesmo!!!

Ok amigo, mas não esqueça de clicar no resolvido já que seu probleminha foi solucionado.