Private Sub UserForm_Activate()
' dans ces cas la proprietee a startUposition a 0-manuel
'en bas a droite
Me.Top = Application.Height - Me.Height
Me.Left = Application.Width - Me.Width
'en bas a gauche
' Me.Top = Application.Height - Me.Height
'en haut a gauche
' Me.Left = Application.Width - Me.Width
' a gauche au milieu dans ce cas la startUposition a centerOwner
' Me.Left = Application.Width - Me.Width
End Sub