Calage curseur à gauche dans UserForm

Bonjour,

Dans un UserForm, j'initialise dans une zone de texte, un libellé avec 3 blancs à gauche.
Ces 3 blancs ont pour objet de pouvoir placer à la place des 2 premiers, une quantité.
Comment faire pour que le curseur soit sur le premier blanc à gauche et non pas sur le premier blanc à droite qui suit mon libellé ?

Merci à toutes et à tous.

Bonjour,

tu ne te simplifierai pas la vie en utilisant 2 zones des texte ( l'une pour la quantité et l'autre pour la désignation ) ?

Bonjour,

Quand tu dis "3 blancs" tu veux dire 3 espaces ? Si c'est le cas, teste ceci sinon, précise :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Private Sub UserForm_Initialize()   With TextBox1   .Text = " <--indiquer la quantité !"   .SelStart = 0 .SelLength = 2   End With   End Sub

---

Hervé.

Bonsoir Theze,

Ce que je souhaiterais :

Dans une Cellule Z1, placer 3 termes :

Le 1er est une quantité (à saisir)
Le 2ème est le contenu d’une autre cellule ( Y1 par exemple )
Le 3ème est un complément d’informations ( à saisir )

Comment entrer le plus économiquement possible dans la cellule Z1 :

1er terme & 2ème terme & 3ème terme

Merci et bonsoir

Bonjour,

Comme te l'a dit bbil, en utilisant 2 TextBox et un Label (pour la valeur issue de la cellule) et sur Exit des TextBox tu inscris dans la cellule :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)   If TextBox1.Text <> "" And TextBox2.Text <> "" Then MettreDansCellule   End Sub   Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)   If TextBox1.Text <> "" And TextBox2.Text <> "" Then MettreDansCellule   End Sub   Sub MettreDansCellule()   Range("Z1") = TextBox1.Text & " " & TextBox2.Text & " " & Label1.Caption   End Sub

---

Hervé.

Merci à tous, je mets ça en forme.

Amicalement pelerin98