ejecutar macro access desde delphi

[Neftali [Germán.Estévez]]

Antes de nada, por favor, revisa la guía de estilo. Has publicado el mensaje en tres foros distintos en menos de 3 horas.

Guía de estilo

En cuanto a la preguta puedes ejecutar una macro de access desde Delphi utilizando el siguiente código:

Código Delphi [-]
 procedure TForm1.Button1Click(Sender: TObject);
 var
   AccessApp: OleVariant;
 begin
   AccessApp := CreateOleObject('Access.Application');
   AccessApp.OpenCurrentDatabase('C:\Temp\dbdemos.mdb');
   try
     AccessApp.DoCmd.RunMacro('Macro1');
   except
     on Exception do
       ShowMessage('Something bad with the macro')
   end;
 end;

Deberás añadir al USES la unit ComObj.

[oliviagadel]

Muchas Gracias por la respuesta, y perdona pensaba q los foros eran independientes.... me tengo q leer esa guia.

[jdattoli]

Hola:

inserte el codigo pero me aparece un error que me indica que acces esta abierto de modo exclusivo, sin embargo lo revise y esta en modo compartido, que puedo hacer??


Jdattoli