[VBA E] limitation nb caractere spécial

Bonjour,

Apres mes recherches infructueuses, je suis tombé sur votre site qui j'espere m'aidera...
Alors voila :

Je possede un champ de chiffres qui ne dépasse pas 3 caracteres et j'aimerais d'une part pouvoir égaliser ou augmenter les chiffres à 3 caracteres et d'autre part avoir un "0" devant la chaine de caratere.

Exemple : j'ai un chiffre "80" et j'aimerais que celui ci devien "080" sans dépasser le nombre de 3 caracteres. ou si j'ai "1" j'aimerai qu'il devienne "001"
Toutefois pour un chiffre de déjà 3 carateres aucune retouche n'est nécessaire.

En tout espoir...merci pour toute aide :roll:

et il est ou ce champ...? voir format...

Ce champ est dans une feuille excel 2000, et
bien entendu j'ai déjà essayé en modifiant le format par un format personnalisé mais cela ne change rien puisque le but est de faire une concténation ac un champ texte pour avoir par exemple AA + 80 -> AA080 et non AA80

Tu veux le faire en VBA ou par formule ?

Par formule, en étant barbare comme d'habitude :mrgreen: tu peux écrire ça :

Code:

---

1 2	=SI(NBCAR(E4)=1;CONCATENER(D4;"00";E4);SI(NBCAR(E4)=2;CONCATENER(D4;"0";E4);CONCATENER(D4;E4)))

---

la colonne D ou il y a ton texte, et la colonne B ou il y a ton nombre :)

Pour la macro, il faut faire un truc du meme genre :

Code:

---

1 2 3 4 5 6 7 8 9

For a = 4 To 6 Cells(a, 5).NumberFormat = "@" deb1: If Len(Cells(a, 5).Value) < 3 Then Cells(a, 5).Value = 0 & Cells(a, 5).Value GoTo deb1 End If Next a

---

et après tu fais une bete concaténation entre tes 2 cellules :)

Génial Merci