Questa è la soluzione che alla fine ho utilizzato, sebbene molto probabilmente si possa fare di meglio.
Dim Shell
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run "C:\cartella\file.accdb /x nomemacro"
Set Shell = Nothing
La macro apre una maschera che su apertura esegue del codice. Lo stesso codice al termine chiude la maschera e per esigenza mia, chiude l'applicazione.
Grazie al forum. Buona giornata.