Set MS Access Window size on open

[tuktuk]

I know that I can set DoCmd.Maximize on open for a form......

but how to I set the size of the ms access window to be around 3 in x 3 in on open.

I appreciate the help.

T

 

[HiTechCoach]

I know that I can set DoCmd.Maximize on open for a form......

but how to I set the size of the ms access window to be around 3 in x 3 in on open.

I appreciate the help.

T

You can use a Widnows API.


Create a Code module to hold this:

Declare Function MoveWindow Lib "user32.dll" (ByVal hwnd As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, _
    ByVal nHeight As Long, ByVal bRepaint As Long) As Long

Then in your Form_Load of your form...

Private Sub Form_Load()
    Dim retval As Long
    
    retval = MoveWindow(Application.hWndAccessApp, 200, 150, 300, 500, 1)

End Sub

This uses Pixels for the size and position.


See:

https://msdn.microsoft.com/en-us/library/windows/desktop/ms633534(v=vs.85).aspx


I assume by 3x3 you mean 3 inches by 3 inches.

You will first have to determine the monitors resolution (DPI) using another API. Using the DPI you can calculate the number of pixels that equal three (3) inches.