Ejecutar macro de otra bdd

[xavi]

Palabras clave:ejecutar, macro, externa
Autor: ¿Búho?

Pregunta
¿Es posible llamar a una macro de una mdb desde otra mdb?

Respuesta
Sí, se puede a través de código y automatización. Por ejemplo esta rutina ejecuta una macro de otra bd (en los argumentos hay que pasarle el nombre y ruta de la bd y nombre de la macro)

Código:

Sub ejecutarMacroOtraBd(rutaBd As String, nomMacro As String)
Dim app As Access.Application

    'creamos otra instancia de access
    Set app = New Access.Application
    ' si quieres que se haga visible
    app.Visible = True
    'abrimos la otra bd
    app.OpenCurrentDatabase rutaBd
    'ejecuta la macro
    app.DoCmd.RunMacro nomMacro
    'cerramos la bd
    app.CloseCurrentDatabase
    'cerramos la otra instancia de access
    app.Quit
    Set app = Nothing

End Sub

Nombre archivo Búho: Llamar macro BD externa.txt