Autres Positionnement d'un UserForm

[Salmander]

Bonjour,
Je m'arrache les cheveux avec le positionnement d'un UserForm.
Je souhaiterais m'en servir comme panneau de commande pour une feuille mais sa position n'importe où en fonction de l'utilisateur me gène.

Quelqu'un saurait-il comment placer le coin en haut à gauche de l'UserForm sur la cellule A1 ?

Merci par avance.

 

[fanfan38]

Bonjour

Private Sub UserForm_Initialize()
  me.startupPosition=0
  me.top=0 '160 pour être à la hauteur de la cellule A1
  me.left=0
end sub

A+ François

 

[Salmander]

Oui, on peut effectivement placer à telle ou telle position.
Mon souci vient des écrans multiples et variation de hauteur des barres de menu.
Pour le moment j'ai ça qui résout le problème des écrans mais ça ne vise toujours pas A1...

Private Sub UserForm_Initialize()
    Me.startupPosition = 0
    Application.Goto Range("A1"), True
    Me.Left = Application.Left + 40
    Me.Top = Application.Top + 160
End Sub