get screen res?

[thingimijig]

just about to post, then brucefox did. anyway.

Dim x As Integer, y As Integer
x = Screen.width / Screen.TwipsPerPixelX
y = Screen.Height / Screen.TwipsPerPixelY
MsgBox Str(x) & "," & Str(y)

thingimijig.