Sub CenterForm(F As Form) 
   F.Left = (Screen.Width - F.Width) / 2
   F.Top = (Screen.Height - F.Height) / 2 - (F.Height / 8)
End Sub

CenterForm Me

dbayerTo be is to do (Rene Descartes)To do is to be (Kant / Nietzsche / Sartre u.a.)Do be do be dooo (Frank Sinatra, Strangers in the Night)