insertion d'un caractère dans TextBox

[xhudi69]

Bonsoir le Forum

Sur l'UserForm lorsqu'on appuie sur le bouton, le TextBox recopie la cellule A1.
J'aimerais que puisse s'inserer dans le TextBox entre le "5" et le "A" le tiret du 6 "-".

Un grand merci pour votre aide.

@+

 

[mapomme]

Re : insertion d'un caractère dans TextBox

Bonsoir xhudi69,

Si j'ai bien compris, essayez;

Private Sub CommandButton1_Click()
  TextBox1.Value = Sheets("feuil1").Range("A1").Value
  TextBox1 = Left(TextBox1, 5) & "-" & Mid(TextBox1, 6)
End Sub

 

[xhudi69]

Re : insertion d'un caractère dans TextBox

Bonsoir mapomme, le Forum

C'est ex-act-te-ment cela, merci à toi et excellente soirée.

Bonsoir à tous.