Colorier un textbox

Bonjour,

Je souhaiterai savoir comment on peut colorier un textbox sur passage de la souris dans la zone du textbox.

Il faut utiliser "mousemove" j'imagine mais dans quelle partie du userform et comment le codifier?

Merci d'avance

passpass

bonjour

Private Sub TextBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  Me.TextBox1.BackColor = RGB(224, 120, 243)
End Sub

et si tu veux que le fond de la textBox devient blanc à la sortie du survol voici le code

Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  Me.TextBox3.BackColor = RGB(255, 255, 255)
End Sub

A savoir dès lors que tu survoles l'userform le Fond de la TextBox devient Blanc ou une autre couleur de ton choix

Bonjour,

Merci. J'ai réussi à faire ça, mais je souhaiterai que la couleur ne se mette que lorsqu'on passe sur le textbox.

En gros, lorsqu'on sort du textbox, il faut que la couleur disparaisse aussi.

Merci de votre aide

??? c'est mentionné dans mon message.

Je n'avais pas vu la partie basse de ton message.

Merci beaucoup.

C'est exactement ce que je voulais.

Bien à toi

Pascal