他のMDBを起動するだけなら、Shell関数で開けばいいでしょう。
Sub cmdBtn_Click()
Dim rc As Long
rc = Shell("MSACCESS.exe C:\TEST\test.mdb", vbNormalFocus)
If rc = 0 Then MsgBox "起動に失敗しました"
End Sub
通報 ...