[Resolvido]Executar uma macro do Excel via Access

Pessoal,

Estou precisando de uma ajuda de vocês, não programo com Excel, mas gostaria de executar uma macro criado no Excel via Access, alguém tem algum exemplo ou poderia me ajudar com isso.

Desde já agradeço pela força.

Atenciosamente,

Pessoal Aí consegui...

Código:


Private Sub cmd_Executar_Click()
    'Executar macro no Excel
   
    Dim appExcel            As Excel.Application
    Dim appExcelWorkbook    As Excel.Workbook
   
    Set appExcel = New Excel.Application
    Set appExcelWorkbook = appExcel.Workbooks.Open(FileName:="C:\Teste\teste.xlsm")
   
    appExcel.Visible = True
   
    appExcel.Run "Leandro"
   
End Sub

Consegui executar a macro.

Quando eu executo novamente o comando, o excel já está instanciado e aplicação irá abrir novamente o arquivo mas não é isso que eu quero é preciso executar a macro do mesmo arquivo.

Alguém sabe como validar já existe uma instancia do excel aberto e se eu consigo executar novamente essa mesma macro.

Att,
Leandro Fonseca

E se fechar o Excel depois de executar a ação? Acredito seria o melhor. Abre, executa e fecha em um clique. Quando precisar de novo, repete o procedimento.

O problema é que eu preciso executar a macro com o arquivo aberto, pois o usuário pode estar a planilha no momento da execução.

Não sei se isso seria a melhor maneira de fazer isso, pois em uma situação hipotética, se o usuário no momento em que estiver alterando uma célula e a aplicação realizar a execução da macro via código, isso não poderia afetar a planilha ou mais corromper o arquivo.

Como não houve retorno, o tópico passa a resolvido. Qualquer coisa reabra, por favor.