Code to move forms... (1 Viewer)

[CedarTree]

Hello - I have two forms that are open while the user is in the DB. I want to move the one form to the right so that the right edge of the form is within say 10 pixels of the right edge of the Access window. And I want the 2nd form's left edge to line up within say 10 pixels of the left edge of the Access window, regardless of how wide the Nav panel is (so the left side of the form would overlap the Nav panel if it happens to be visible). Suggestions? I figure someone has gone to the trouble of doing the math. THANKS!!!

 

[The_Doc_Man]

You are looking for the form's properties .WindowHeight, .WindowWidth, .WindowLeft, and .WindowTop

Here is a link to .WindowLeft, but if you look to the left on this particular reference page, you will see the other three items for lookup.

Form.WindowLeft property (Access)

Office VBA reference topic

learn.microsoft.com

However, this doesn't work in pixels. In order to avoid issues with non-uniform display resolutions i.e. every user potentially has a different screen, Access always works in units of TWIPS, where one TWIP = 1/1440 of an inch. To determine actual resolution,

How to retrieve screen size/resolution in MS Access VBA to re-size a form

I have two popup forms (parent/child) that I want to be able to automatically re-size depending on the size of the screen. How can I retrieve the size of the screen in order to achieve this.

stackoverflow.com

From there, you can compute twips per pixel (or pixels per twip), which depends only on the dot pitch of your monitor.

pixels to twips-VBForums

how do you convert pixels to twips?

www.vbforums.com

 

[LarryE]

Private Sub Form_Load()
DoCmd.MoveSize 3500, 1000
Exit Sub
End Sub

This will move the form to the Right 3500 twisps and Down 1000 twisps on your screen when the form loads. Change to meet your needs.