Is it reasonable, or possible, to try to set a userform to size it with a different screen resolution?

We have a few systems that are set to a screen resolution of 800 x 600 and I usualy try to set to that resolution for any userforms or setting individual sheet zoom resolution.

For individual sheet resolution I frequently use something like:
Dim bYesNo As Boolean
    ' use some tool to only do this one time per session, e.g Workbook_Open
    Range("A1:O33").Select
    ActiveWindow.Zoom = True
    Range("A1").Select
    bYesNo = ActiveWindow.Zoom > 100
    If bYesNo Then ActiveWindow.Zoom = 100
However, this does nothing for the userform. If a user opens the workbook with a screen resolution of 1024 x 768 or even greater the userform starts to look rather small.

Is there a way to detect what the screen resolution might be, set som constants accordingly and change the individual sheet zoom as well as the userform sizing?

If so, where can I find examples?