Bonjour
j'ai 2 userforms
principale = UserForm_photo
secondaire = UserForm_apercu
 
la première appelle la seconde si besoin
 
je voudrai que la seconde suivent la première quand je deplace la première
je ne trouve pas d'évènement move sur les userforms
 
 
J'ai en partie trouvé,
Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
UserForm_apercu.Top = UserForm_photo.Top
UserForm_apercu.Left = UserForm_photo.Left + UserForm_photo.Width
End Sub
 
 
mais ça m'oblige a repasser sur une zone de la userform    
et le deplacement n'est pas en direct
 
vous avez une idée ?

Bonjour,
 
je sais que ce genre de réponse est agaçant, mais malgré tout... pourquoi 2 userforms et pas un seul si le second suit le premier ?

parce que le premier est indispensable
le second est facultatif
 
mais les 2 sont trop encombrants, pour les avoir en permanance
 
bref un fonctionnement un peu comme les fenètres de winamp
 
 
et
pour savoir faire

Aprés bcp de recherches :
 
 
Private Sub UserForm_Layout()
UserForm_apercu.Top = UserForm_photo.Top
UserForm_apercu.Left = UserForm_photo.Left + UserForm_photo.Width
End Sub
 

et un simple UserForm_photo.Right ca n'existe pas ?

Bonsoir,
Bingo aprilthe5ith!! Je m'étais embarqué dans des trucs pas possibles pour piquer l'évènement, en pensant que layout n'était activé que pour des changements de taille
C'est Daniel-12 qui va être content.
Cordialement
 

Mais le pire c'est que c'était sous nos yeux !
Et je suis tombé sur plein de posts négatifs : "ah, non, ca c'est pas possible ou alors il faut passer par des API de malades..."
j'ai fini par avoir la réponse sur un forum de 2004 (...)

 
ben voila la solution simple !!
Merci