MichelPires

Consegui resolver kkk! A solução foi a mesma, porém na chamada da macro (que está no Access) do Access, ultilizei, conforme abaixo: Sub ChamarMacroAccess() Dim sCaminho As String Dim obj As Object Dim appObj As Object sCaminho = "ActiveWorkbook.Path & "\BANCO.MDB"" Set appObj = CreateObject("Access.Application") 'A linha de baixo é opcional appObj.Visible = True appObj.OpenCurrentDatabase sCaminho app.Obj.DoCmd.RunMacro "MinhaMacro" appObj.Quit End Sub

Boa tarde! Muito Obrigado pela Solução. Tive a mesma situação, porém no passo appObj.Run "MinhaMacro", tenho a seguinte mensagem: Erro em tempo de execução '2517': O Microsoft Access não pode localizar o procedimento 'MinhaMacro.' Alguém poderia me ajudar com alguma solução para o problema? Desde já agradeço a atenção!