-
Hi,
maybe this helps:
Code:
Dim width As Long
Dim height As Long
DoCmd.OpenForm "Form1", acNormal
DoCmd.Maximize
width = Forms("Form1").WindowWidth
height = Forms("Form1").WindowHeight
DoCmd.Restore
DoCmd.Close
MsgBox "Width = " & width & ", Height = " & height
The determined width and height don' count that windows have a title and a border. To be on the save side, you can use
Code:
width = Forms("Formular1").InsideWidth
height = Forms("Formular1").InsideHeight
instead.
Happy New Year
Roger
-
Thanks. I'll give it a try.
-
Does anyone know how to get the width and height of the workspace in Access? I am not referring to a database workspace, but rather to the desktop space, within Access' borders and toolbars, where Access' child windows (forms, tables, etc.) appear.
I am trying to position and size Access forms using the docmd.movesize command, but I need to keep the forms within Access' borders.
