Bonjour à tous !
J'aimerais avoir une textbox qui contienne un texte avec des indications du genre "Ecrire ici le nom du produit". Lorsque l'utilisateur clique dessus, le texte disparaît et l'utilisateur peut écrire le nom du produit.
Pour cette partie, mon code fonctionne :
En revanche, je voudrais que si l'utilisateur clique sur la zone de texte (donc fait disparaître "Ecrire ici le nom du produit") mais qu'il n'écrit rien et clique à l'extérieur de la zone, ce texte revienne...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) If TextBox1.Value = "Ecrire ici le nom du produit" Then TextBox1.Value = "" End Sub
Pour cela j'ai utiliser le textbox exit mais sans succès...
Pourriez-vous m'aider ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) If TextBox1.Value = "" Then TextBox1.Value = "Ecrire ici le nom du produit" End Sub
Merci !
Partager