Aller à la première ligne d'un textbox dans un userform

Bonsoir, je voulais savoir si on peut faire en sorte que quand un userform s'ouvre le textbox soit à la première et non à la dernière.

Il y a-t-il plus simple que :

Code:

---

1 2 3 4

With TextBox1 .SetFocus .SelStart = 0 End With

---

Merci de votre aide

Bonjour

C'est justement ce que j'allais te proposer, pour moi je ne vois pas ce qu'il y a de plus simple que ce code.

Je vois pas ce qui peut te poser un problème sur ce code.

Philippe

Il ne me pose pas de problème mais je me demandais s'il y avait une autre solution

Merci

bonjour a tous les deux

pour le fun et puisque tu aime les choses un peu plus compliquées

voila deux ligne qui:
te selectionne la 1 ere ligne complete du textbox

Code:

---

1 2 3 4 5

Private Sub selectionne_ligne1_complete_Click() With TextBox1 .seltart = 0 .TextLength = Len(Split(TextBox1, Chr(13))(0)) End Sub

---

au plaisir