UserForm Start Position

Question

Hi all,

I'm writing those lines to ask help with UserForms start position.

When I create a new UserForm I have on Properties Box and on Position, the followings properties:

Height

Left

StartUpPosition

Top

Width

The Height and Width defines the size of UserForm

The StartUpPosition defines the way as windows permite or not, change the position by user

The Left and Top defines de distance of left and of top to our UserForm

I want put the UserForm on Bottom or on Right of screen and for that I must know the maximum height and maximum width of excel's window which depends of monitor resolution.

With those variables, I could to do on Initializing UserForm something like :

UserForm1.Position.Top = maximum_height - UserForm1.Position.Height

and to put the UserForm aligned with right screen side, like:

UserForm1.Position.Left = maximum_width - UserForm1.Position.width

Someone could help me?

Diogo

Answer 1

Try

Private Sub UserForm_Initialize()

    Me.Top = Application.Top + Application.Height - Me.Height

    Me.Left = Application.Left + Application.Width - Me.Width

End Sub

Answer 2

Thanks, it is perfect!

Now it is possible put the UserFom on bottom and centered horizontaly.

Diogo