Dim ap As Access.Application
   'abrimos otra instancia de access
   Set ap = New Access.Application
   'dentro de esa otra instancia del
   'programa Access, abrimos otra base
   ap.OpenCurrentDatabase "OtraBD.mdb"
   'abrimos/imprimimos un informe
   'alojado en esa otra bd
   ap.DoCmd.OpenReport "otroInforme"
   'cerramos la otra bd
   ap.CloseCurrentDatabase
   'cerramos la aplicación
   ap.Quit
   'cerramos el objeto
   Set ap = Nothing