Afficher le zero en debut ou fin d'une chaine

Question

Tout d''abord, BONNE ANNEE 2021 a tous les lecteurs. Voici mon problème, je pense qu'il est simple mais je n'arrive pas à trouver. Imaginons que j'ai un compte bancaire avec le numéro IBAN suivant :FR15 20569 01519 8855695d245 50. (les espaces ne sont la que pour la lecture) NOTE : ce compte est une pure fiction, il a été totalement inventé dans cette chaine on repère le code banque(20569), le code guichet(01519) et la cle(50). Dans une méthode, j'utilise cela : ActiveCell(1, 2) = Mid(Iban, 5, 5) 'code banque ActiveCell(1, 3) = Mid(Iban, 10, 5) 'code guichet ActiveCell(1, 4) = Mid(Iban, 14, 25) 'num compte ActiveCell(1, 5) = Right(Iban, 2) 'clé ou est un objet string contenant l'IBAN entier. mon problème est que tout fonctionne parfaitement, du moment que chacun des champs commence par un chiffre différent de zéro. Pour tester, j'ai fait un msgbox qui rappelle chaque partie du style msgbox("code guichet :" & Mid(Iban, 6, 5) ) mais, par exemple dans cet IBAN, le code guichet n'apparait pas comme 01519, mais comme1519. J'ai essayé de le parser avec cStr, j'ai essayé aussi de faire une condition si qui si le code commence par un zéro, ca rajoute un zéro en tant que string, mais rien n'y fait. je ne sait pas trop comment m'en sortir. Si quelqu'un peut m'aiguiller, ce serait top. merci d'avance...

Gabin37 · Accepted Answer

Salut, je tente de proposer une solution:

ActiveCell(1, 2) = "'" + Mid(Iban, 5, 5) 'code banque
ActiveCell(1, 3) = "'" + Mid(Iban, 10, 5) 'code guichet
ActiveCell(1, 4) = "'" + Mid(Iban, 14, 25) 'num compte
ActiveCell(1, 5) = "'" + Right(Iban, 2) 'clé

L'idée c'est d'écrire '01519 au lieux de 01519 comme ca excel comprendra que c'est une chaine de caractère et conservera les 0

A+

3GB · Answer

Il est également possible d'utiliser la fonction Format : resultat = Format(Depart, "00000") Et pour ce qui est du numéro de compte, pareil mais avec 10 ou 11 zéros, à moins qu'il ne contienne une lettre. Cdlt...