Form maximize problem

[Guest]

I have a form which is maximized on open with Docmd.Maximize.
I have a few command buttons to preview reports on that form.
Whenever I preview a report and close the report, the form is no longer
maximized.
How can I keep the form maximized after preview of a form?

 

[RB Smissaert]

If you have/can get the hwnd of that form then this will do it:

Private Declare Function SetWindowLong _
Lib "user32" Alias _
"SetWindowLongA" (ByVal hwnd As Long, _
ByVal nIndex As Long, _
ByVal dwNewLong As Long) As
Long
Private Declare Function ShowWindow _
Lib "user32" (ByVal hwnd As Long, _
ByVal nCmdShow As Long) As Long

Sub MaxWindow(lHwnd As Long)

ShowWindow lHwnd, 0
SetWindowLong lHwnd, -20, &H40101
ShowWindow lHwnd, 3

End Sub

RBS

 

[Guest]

Hi Marco -- In addition to what RB recommended, you can also try moving the
code to the On Load event...