Autres Positionnement d'un UserForm

Salmander · Aujourd'hui à 09:47

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 · Aujourd'hui à 10:09

Bonjour

VB:

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 · Aujourd'hui à 10:33

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...

VB:

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

Dranreb · Aujourd'hui à 16:21

Bonjour.
Essayez les méthodes PointsToScreenPixelsX et PointsToScreenPixelsY de l'objet Pane

Autres Positionnement d'un UserForm

Salmander

XLDnaute Occasionnel

fanfan38

XLDnaute Barbatruc

Salmander

XLDnaute Occasionnel

Dranreb

XLDnaute Barbatruc

Discussions similaires

Autres Positionnement d'un UserForm

Salmander

XLDnaute Occasionnel

fanfan38

XLDnaute Barbatruc

Salmander

XLDnaute Occasionnel

Dranreb

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency