Selection contenu textbox avec souris

Bonjour,

J'ai bien trouvé un moyen pour que le texte d'un textbox soit sélectionné avec la souris. j'ai plusieurs textboxs, j'ai donc repris ce code pour tous les textboxs.

Code:

---

1 2 3 4 5 6 7

Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) With TextBox1 .SetFocus .SelStart = 0 .SelLength = Len(TextBox1.Text) End With End Sub

---

Voici ma question: y a-t-il un moyen pour gérer tous les textboxs, comme une boucle?

En vous remerciant par avance.

Bonjour,

lesboucles, voir icihttp://silkyroad.developpez.com/VBA/...UserForm/#LI-B

Bonjour Casefayere,

Merci pour le lien, mais ça ne m'aide pas beaucoup. J'ai peut-être posé la mauvaise question (Boucle). Je ne connais pas toutes les possibilités du VBA.

Etant donné que j'utilise l’événement textbox_MouseMove pour chaque textbox, existe-il un moyen pour avoir un code "générique" pour gérer tous les textboxs.

J'ai 13 textboxs et j'ai mis le même code sur les 13 événements MouseMove en adaptant les numéros des textboxs.

j'ai essayé ainsi mais ça plante

Code:

---

Private Sub Msforms.TextBox_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

---