[Resolvido]Qual o código para abrir uma pasta e executar um arquivo dela?

Boa noite, amigos.

Na minha pasta do Dropbox tem uma pasta com arquivo que uso para pesquisar CID 10 (Código Internacional de Doenças). Esse é o link da Pasta:

https://www.dropbox.com/sh/26vew4dl4j2jxeg/tu3pcBfd1U


Gostaria de, através de um botão em meu formulario abrir o arquivo "pesqcid" que é .exe. Qual o código que devo usar no botão? Procurei no Forum e não consegui encontrar algo que me ajude.

Tentei com o código:

Private Sub Comando24_Click()
Dim stAppName As String
stAppName = "C:\Users\Walter\Desktop\CID 10\pesqcid"
Call Shell(stAppName, 1)
End Sub


Mas aparece uma mensagem dizendo: "Arquivo cid10n4a.dic não encontrado". Mas o arquivo cid10n4a.dic está lá na pasta! E o aplicativo abre normalmente, se não for pelo botão do Access...

O que pode estar acontecendo?
Obrigado,

Walter

Olá Walter,

Pesquise por shell

Editado:
Na busca rápida deu isso, veja:
shell - [Resolvido]Comando Shell para abrir um arquivo excel ou outro comando?

Olá, Dilson.
Boa tarde.
Os exemplos que você enviou são para abrir arquivos Excel e Word. Não consegui adapta-los para a minha necessidade.

Tem alguma outra sugestão?

Já tentei vários códigos, como:

1) Application.FollowHyperlink "C:\Users\Walter\Desktop\CID 10\pesqcid.exe"


2) Dim wAplicativo As String
Dim wArquivo As String
wAplicativo = "C:\Users\Walter\Desktop\CID 10\pesqcid.exe"
wArquivo = "c:\temp\carta.doc"
Call Shell(wAplicativo & " " & Chr(34) & wArquivo & Chr(34), 1)

3) Dim stAppName As String
stAppName = "C:\Users\Walter\Desktop\CID 10\pesqcid"
Call Shell(stAppName, 1)



Um abraço

Walter

Experimente assim dessa outra forma:

Por exemplo, o F1 nos disponibiliza o seguinte exemplo em que podemos executar um programa:

Private Sub SeuBotao_Click()
' Especificar 1 como o segundo argumento abre o aplicativo em
' tamanho normal e o coloca em foco.
Dim RetVal
RetVal = Shell("C:\Users\Walter\Desktop\CID 10\pesqcid.EXE", 1)   ' Executa o programa.
End Sub

Obrigado Dilson.
Obrigado Avelino.

Nenhum desses códigos conseguiu abrir/executar o Arquivo. Deve ser a estrutura do mesmo que não permite...

Não importa. Consegui resolver o problema de outra forma: Enchi-me de coragem, sentei numa cadeira confortável e pus a mão na massa!
Achei um exemplo de formulário que busca palavras por parte enquanto se vai digitando.

Funciona exatamente igual ao Arquivo que eu estava tentando abrir.
Veja o mesmo nessa página:

http://www.accessfaq.com.br/webroot/default.asp?http%3A//www.accessfaq.com.br/webroot/detalhe.asp%3FPergunta_Id%3D48

Fiz algumas adaptações, copiei os dados da Tabela e inseri nesse aplicativo e.... U-Lá-Lá!
Ficou perfeito.

Já o inclui no meu BD, sem problemas.

Veja como ficou nesse anexo.

Muito obrigado a todos e um abraço.

Walter