Code Snippets → Open Another Database

This code opens another instance of Access and the database that the full path and name is sent to the function.

Function OpenNewDatabase(strDatabase As String)
    Dim appAcc As Access.Application
    
    Set appAcc = New Access.Application
    appAcc.Visible = True
    
    appAcc.OpenCurrentDatabase (strDatabase)
    appAcc.UserControl = True
    
End Function