A parte predisporre la FORM in modo che si centri nello schermo... che potresti farlo...
Prova questa variante:
Function ShellEx(strSourceFile As String) As Boolean
On Error Resume Next
Dim lngPID As Long
lngPID = Shell(SysCmd(acSysCmdAccessDir) & "MsAccess.Exe " & _
"""" & strSourceFile & """",vbMaximizedFocus)
ShellEx= (Err = 0)
End Function
Lancial la [ShellEx] passando il Path del File MDB o quello che è...