[Resolvido]Adionar botão num formulário para abrir formulário de outro banco de dados.

Bom dia a todos!

Meu nome é Mario Sergio e, apesar de estar cadastrado há alguns meses, me apresento hoje a todos como mais um aprendiz nesse forum.
Sou autodidata em Access meu meu único mestre até tomar conhecimento desse forum era a tecla F1.

Bem, estou criando alguns pequenos BD's e gostaria de, a partir de de um BD principal, acessar os outros. Para isso pensei em adicionar no form Menu um botão que permita essa operação (Executar Aplicativo), então escrevi:

stAppName = "C:\Arquivos de programas\Microsoft Office\Office\MSACCESS.EXE C:\Users\Paru\Documents\Planilhas_Integradas\Planilhas_Integradas_Clamidia.mdb"

Mas parece que algo está errado, o Vba retorna mensagem de erro de sintaxe ou de compilação. Alguém pode me ajudar a solucionar esse problema?

Agradecimentos antecipados! 

O código a seguir está disponibilizado aqui no fórum. Deve resolver seu problema.

Código:


Abrir Banco a partir de outro Banco Ms Access

Private Sub SeuBotao_Click()
Dim strcmd As String
Dim objaccess As ACCESS.Application
strcmd = SysCmd(acSysCmdAccessDir) & "\msaccess.exe " & "c:\Teste.mdb"
Call Shell(strcmd, vbNormalFocus)
DoEvents:
Set objaccess = GetObject("c:\Teste.mdb")
DoCmd.Quit ' para fechar o banco mdb que chamou o outro
End Sub


Certo halmeida, consegui localizar esse código ontem à noite no Repositório. Muitíssimo obrigado pela atenção e ajuda.

Abraço!