ник: ddi
Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long
Public Const SW_HIDE = 0
Public Const SW_NORMAL = 1
Private Sub Form_open(Cancel As Integer)
ShowWindow Application.hWndAccessApp, SW_HIDE
End Sub