[RESOLU par Jacky67 ] : Editer TextBox

[MADAGASCAR]

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]

Bonsoir,
Quelque chose comme ceci

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]

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]

Re, j'ai lu en diagonale
Toujours 12 Chiffres ??

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

 

[MADAGASCAR]

Bravo Jacky67
Extra resolu
Tres tres gentil de votre part
Amicalement
MADA