Excel vba center userform

' On application window
Private Sub UserForm_Initialize() 
   Me.Top = Application.Top + (Application.UsableHeight / 2) - (Me.Height / 2) 
   Me.Left = Application.Left + (Application.UsableWidth / 2) - (Me.Width / 2) 
End Sub 
' Or
With myForm
    .StartUpPosition = 0	' Manual
    .StartUpPosition = 1	' CenterOwner	
    .StartUpPosition = 2	' CenterScreen
    .StartUpPosition = 3	' WindowsDefault, screen top left
End With

Source: bettersolutions.com

Similar codes

0 vote129 views1 answer
VB Error Code BC30201
VBA
0 vote127 views1 answer
Vb net show lines for all axis labels in chart
VBA
5 votes148 views1 answer
Excel vba second byte from INTEGER
VBA
0 vote127 views1 answer
Check range is in another range vba
VBA
0 vote136 views1 answer
Columns dont autoresize on program start vb.net
VBA
5 votes134 views1 answer
Xl vba double quotes in string literal
VBA
0 vote134 views1 answer
Discern between file and folder given path vb.net
VBA
4 votes130 views2 answers
Vba create folder if not exist
VBA
0 vote129 views1 answer
Vba get relative cell address
VBA
0 vote140 views2 answers
Vba remove line breaks
VBA