Rafael Stroppa

Amigo, Segui sua orientação, mas não tive sucesso. Abaixo segue a Sub que estou trabalhando. Como você pode notar, antes de chamar a execução da macro do Excel, eu estou exportando o resultado de uma consulta para o arquivo Excel que contém a macro. Private Sub Command23_Click() On Error GoTo Err_Command23_Click DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, "qry_Veículos ON 2 - períodos", "c:\conflito.xls" Dim appExcel As Excel.Application Set appExcel = OpenObject("Excel.Application")(App.Path & "C:\conflito.xls") appExcel.Run (Macro1) Exit_Command23_Click: Exit Sub Err_Command23_Click: MsgBox Err.Description Resume Exit_Command23_Click End Sub Onde estou errando? Abraço, Rafael

Boa tarde pessoal! Gostaria de saber como fazer para executar uma macro do Excel através de um código escrito no VBA do Access. Grato desde já, Rafael