Discussion :

[XceSs]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
With TextBox1
    .SetFocus
    .SelStart = 0
End With

Merci de votre aide

[Invité]

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

[XceSs]

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

Merci

[patricktoulon]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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