Elargir un label

bonjour josé,

si tu veux changer la largeur du label quand le pointeur
de souris le survole et revienne à sa valeur initiale
quand elle le quitte :

Private Sub Label1_MouseMove()
Label1.Width = 200
End Sub

Private Sub UserForm_MouseMove()
Label1.Width = largeur_initiale
End Sub

Tu dois aussi faire revenir le label à la largeur
initiale quand ta souris pointe sur tous les contrôles de
ton UserForm

-----Message d'origine-----
Bonjour à tous,

J'aimerai savoir quel code utiliser pour changer la
largeur d'un label d'une

UserForm à l'aide de la souris lorsque cette Userform
est activée.

Merci par avance.


.