Electron24
XLDnaute Occasionnel
Bonjour,
Je souhaiterais séparer un code postal inscrit dans un textbox dans 5 autre txtbox.
J'ai dans Txt_Code_Postal inscrit 59166 je souhaiterai après AfterUpdate avoir le 1er chiffre "5" dans un autre textbox nommé Txt_Code_1 dans un autre txtbox nommé Txt_Code_2 le 2ème chiffre "9" et ainsi de suite.
Ceci afin de les notés individuellement dans 5 cellules d'une feuille. (I15 - K15 - M15 - O15 - Q15)
J'ai trouvé :
qui me récupère le premier chiffre mais je cale pour les autres.
Merci d'avance pour votre aide.
Je souhaiterais séparer un code postal inscrit dans un textbox dans 5 autre txtbox.
J'ai dans Txt_Code_Postal inscrit 59166 je souhaiterai après AfterUpdate avoir le 1er chiffre "5" dans un autre textbox nommé Txt_Code_1 dans un autre txtbox nommé Txt_Code_2 le 2ème chiffre "9" et ainsi de suite.
Ceci afin de les notés individuellement dans 5 cellules d'une feuille. (I15 - K15 - M15 - O15 - Q15)
J'ai trouvé :
Code:
Txt_Code_1.Value = Left(Txt_Code_Post.Value, 1)
Merci d'avance pour votre aide.