How Can You Force a Particular Popup Form Height and Width?

[VWP1]

I am looking to force each popup form to the dimensions of height and width
that I want. I tried setting the Border Style Property to Sizeable and Auto
Resize to No, however when I go from Design View to Form View for the Popup
Form, I have to resize the form each time; when I set the Border Style to
"Thin" I cannot change the dimensions.

 

[Barry A&P]

Set your border type to thin
then resize the design area grid not the forms border when in design view..


if auto resize is set to yes the form will resize to your design grids size
if auto resize is set to no the form will have the border size you drag to in
design view..

hope this delps

Barry

 

[ruralguy via AccessMonster.com]

Have you looked at DoCmd.MoveSize?

I am looking to force each popup form to the dimensions of height and width
that I want. I tried setting the Border Style Property to Sizeable and Auto
Resize to No, however when I go from Design View to Form View for the Popup
Form, I have to resize the form each time; when I set the Border Style to
"Thin" I cannot change the dimensions.

 

[VWP1]

I haven't looked at that. 'didn't know it existed.
Can you be so kind as to do a private sub for me, because I'd need the
procedure with all the nuts and bolts.

Private Sub object_Perhaps_the_FormName_SomeEvent()
DoCmd.MoveSize what? Height =? Width=?
End Sub

 

[fredg]

I haven't looked at that. 'didn't know it existed.
Can you be so kind as to do a private sub for me, because I'd need the
procedure with all the nuts and bolts.

Private Sub object_Perhaps_the_FormName_SomeEvent()
DoCmd.MoveSize what? Height =? Width=?
End Sub

You wish the form to always *Open* to the specific size?
How high and how wide? How about 3 inches wide by 2 inches tall?

Private Sub Form_Load()
DoCmd.MoveSize , , 3*1440,2*1440
End Sub

Note: All measurements are in Twips.... 1440 per inch.

 

[VWP1]

Thank you; it worked.

Do they have to be in twips?

Can there be a pixel size instead of inches?