[RESOLVIDO] outlook abrindo access

Olá, pessoal

Gostaria de uma ajuda, eu necessito de uma aplicação em vba no outlook que abra um arquivo access

Agradeço a atenção

Já tentei:

dim strcaminho as string
strCaminho = Caminho do seu arquivo
Application.FollowHyperlink strCaminho

Não funcionou

Ribar

Boa noite tente este codigo abaixo:

Este abre uma aplicação especifica

Código:


Function chamar_access_1()
Dim x
x = Shell("C:\Program Files\Microsoft Office\Office15\MSACCESS.exe C:\Roonilo\log.accdb")
End Function




Este abre apenas o ACCESS

Código:


Function chamar_access_2()
Dim x
x = Shell("C:\Program Files\Microsoft Office\Office15\MSACCESS.exe")
End Function


x = Shell("C:\caminho onde esta instalado seu access\MSACCESS.exe C:\caminho onde esta sua aplicação\log.accdb")



Duvidas acesse>>>> http://www.utteraccess.com/wiki/index.php/Opening_Files_From_Access
Espero que ajude.

vlw

Danilo,

Grato pela ajuda,
Funcionou!

Somente tive dificuldade de identificar o local que está instalado o Access,
Pois no Explorer o nome dava como erro de "Arquivo não localizado"
Somente consegui o endereço correto pelo Prompt Comando

Exemplo:
Explore: "C:\Arquivos de Programas\.....(errado)
Prompt: "C:\Program Files \.....(correto)

Obs.: Está abrindo o Access, mais está aparecendo somente no rodapé da tela,
tem como abrir em tela cheia?

Grato!

Resolvido!

No formulário de exibição de abertura do Access, no evento ao abrir coloquei o código abaixo:

DoCmd.Restore
DoCmd.RunCommand acCmdAppRestore


Grato, Danilo