Access - Abrir otro .MDB en la misma instancia

Puede alguien indicarme como desde una instancia de Access abierta y estando ejecutándose una aplicativo .MDB se puede cerrar este y abrir mediante Visual Basic otro .MDB.
Utilizo el siguiente programa

Dim appAccess As Access.Application
Private Sub Sortir_Click()
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase "C:\Electra\Cp.MDB"
End Sub

pero me dice que el nuev¡o .MDB ya esta abierto o se está utilizando, cuando no es verdad

Para abrir otro archivo de base de datos MDB en la misma instancia de Access, debes usar el método `OpenCurrentDatabase` del objeto `Application` de Access en lugar de crear un nuevo objeto `Application`. Aquí te dejo un ejemplo de código que podrías usar:


Este código cierra la base de datos actualmente abierta en la instancia de Access y luego la cierra completamente antes de abrir la nueva base de datos en la misma instancia. También usa la función `GetObject` para obtener la instancia actual de Access en lugar de crear una nueva instancia.