[VBA-E] Afficher les 0 devant un nombre
Bonjour à tous,
J'ai des nombres dans les cellules d'un classeur et je voudrais ajouter un 0 devant si ces nombres ne sont composés que de 3 chiffres, j'ai donc fait ceci:
Code:
1
2
3
4
5
|
If Len(Cells(i, 3).Value) = "3" Then
buf = Cells(i, 3).Value
Cells(i, 3).Value = "0" & buf
End If |
Le souci c'est que, quelque soit la catégorie/type sélectionnée dans format de cellule, le 0 avant n'est jamais affiché.
Le code marche si je rajoute par exemple:
Code:
1
2
|
Cells(i, 3).Value = "10" & buf |
C'est OK.
Mais pour ne rajouter qu'un seul 0, cela ne marche pas.
Auriez-vous une idée...
Merci pour vos réponses.
