setting form width in access

[hawaiijeff]

I'm trying to set the width of a form so that it's only about 3 inches wide on the screen, but it keeps maximizing itself. If the calling form is maximized it immediately goes to maximized. I'd like to set the size of the form in either VBA or in the properties window and have it stay that way whenever the form is called.

[missinglinq]

I think that the only way you can do this, Jeff, is to either have your smaller form defined as a PopUp form, or use acDialog as the WindowMode argument of the OpenForm command (which sets PopUp and Modal properties to Yes)

DoCmd.OpenForm stDocName, , , , , acDialog

Linq ;0)>

[ADezii]

I'm trying to set the width of a form so that it's only about 3 inches wide on the screen, but it keeps maximizing itself. If the calling form is maximized it immediately goes to maximized. I'd like to set the size of the form in either VBA or in the properties window and have it stay that way whenever the form is called.

To overwrite any previously existing Window States, and precisely position a Form, place the following code in the Form's Open() Event. This code will move a Form 3 inches to the Right, make no Downward adjustment, set its Width to 3 inches, and its Height to 5.5 inches.

Private Sub Form_Open(Cancel As Integer)
Const conInchesToTwips = 1440   'enables you to specify dimensions in Inches
Dim intRight As Integer, intDown As Integer, intWidth As Integer, intHeight As Integer
 
DoCmd.Restore
 
intRight = (3 * conInchesToTwips)
intDown = 0
intWidth = (5 * conInchesToTwips)
intHeight = (5.5 * conInchesToTwips)
 
DoCmd.MoveSize intRight, intDown, intWidth, intHeight
End Sub
 

[NeoPa]

Line #5 is the important one if you simply want the form to avoid being opened as maximised.

[hawaiijeff]

Thanks everyone for the help. I used a hybrid of all the answers. I set the form to be a pop-up and used the code to adjust it's size and position.

[ADezii]

Thanks everyone for the help. I used a hybrid of all the answers. I set the form to be a pop-up and used the code to adjust it's size and position.

Nice solution, the best of both worlds!

[NeoPa]

The beauty of multiple answers and ideas being posted.
The OP can mix & match to get what they want :)