...cioè... quello che con vb6 era + o -:
codice:
Dim miaAccessApp As Access.Application
Set miaAccessApp = New Access.Application
Dim miaMacro As Access.AllMacros
miaAccessApp.OpenCurrentDatabase "C:\db1.mdb"
miaAccessApp.DoCmd.RunMacro "Macro1"
miaAccessApp.CloseCurrentDatabase