Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

[RESOLU par Jacky67 ] : Editer TextBox

MADAGASCAR

XLDnaute Occasionnel
Bonsoir EXCEL DOWNLOADS
Bonsoir tout le monde
Gentelmans
Comment faire SVP pour resoudre ce probleme
Dans TextBox1 j'ai un le montant 457896524193 de douze chiffres
Des que je tape ces chiffres s'affichera automatiquement dans TextBox2 les quatres premiers chiffres dans cet exemple ( 4578) et dans TextBox3 les deux derniers chiffres dans cet exemple (93)
Merci beaucoup d'avance pour l'aide
Cordialement
MADA
 

Jacky67

XLDnaute Barbatruc
Bonsoir,
Quelque chose comme ceci
Code:
Private Sub TextBox1_Change()
If Len(TextBox1) < 5 Then
Me.TextBox2 = Me.TextBox1
Else
Me.TextBox3 = Mid(Me.TextBox1, 5, Len(Me.TextBox1))
End If
End Sub

Bonne nuit
 

MADAGASCAR

XLDnaute Occasionnel
Bonsoir Jacky67
Merci beaucoup pour l'aide
Tres gentil de votre part
Pour TextBox2 ca fonctionne tres bien mais dans TextBox3 je veux afficher seulement les deux derniers chiffres comme j'ai explique dans mon premier poste
Dans tous les cas MERCI
Cordialement
MADA
 

Jacky67

XLDnaute Barbatruc
Re, j'ai lu en diagonale
Toujours 12 Chiffres ??
Code:
Private Sub TextBox1_Change()
If Len(TextBox1) < 5 Then
Me.TextBox2 = Me.TextBox1
ElseIf Len(TextBox1) >= 10 Then
Me.TextBox3 = Mid(Me.TextBox1, 11, Len(Me.TextBox1))
End If
End Sub
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…