that's perfect 
thanks  @isladogs
just imported module : modDatabaseWindow from your example 
and used 
    Me.Painting = False
    SetWindowLong Me.hWnd, GWL_EXSTYLE, GetWindowLong(Me.hWnd, GWL_EXSTYLE) Or WS_EX_APPWINDOW
    ShowWindow Application.hWndAccessApp, SW_HIDE
    ShowWindow...