Skifte til ny db og tilbage igen

Du kan starte en anden database med nedenstående kode:

Dim htask As Variant
Dim AppPath As String
AppPath = SysCmd(acSysCmdAccessDir) & "MSACCESS.EXE"
htask = Shell(AppPath & " C:\Dokumenter\AndenDB.mdb", 1)

Denne løsning har jeg prøvet og den virker.
Kan man også lave en procedure, der lukker den åbnede database igen?

Da den viste procedure starter en ny session af ACCESS, kan man skifte tilbage til den første formular og derved efterlade databasen kørende. Jeg ville gerne have at man ikke kunne komme tilbage til den første formular uden at databasen er lukket.

Lyder det indviklet?

Prøv at tilføje en linie:

DoCmd.Quit 

efter ovennævnte kode. Derved lukker programmet helt ned. Du kan så bruge den samme (eller tilsvarende) kode i den anden database til at starte den første op igen.