Acces 2003

[Taribo007]

Hay una forma de ocultar la ventana madre de access:

Copia esto en un módulo:

Option Compare Database
Option Explicit
Global Const SW_HIDE = 0
Global Const SW_SHOWMINIMIZED = 2
Global Const SW_SHOWMAXIMIZED = 3
Private Declare Function apiShowWindow Lib "user32" _
Alias "ShowWindow" (ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long
Function fSetAccessWindow(nCmdShow As Long)
Dim loX As Long
Dim loForm As Form
loX = apiShowWindow(hWndAccessApp, nCmdShow)
End Function
y para llamar la función en el evento al abrir del formulario: FSetAccessWindow(0)

No te olvides que todos los formularios mientras tengas la ventana invisible deben estar en Modal y Emergente = Sí y que para ver un informe en el momento de lanzarlos debes poner FSetAccessWindow(3) y viceversa al cerrarlo.

Un saludo