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:
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é.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 code marche si je rajoute par exemple:
C'est OK.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Cells(i, 3).Value = "10" & buf
Mais pour ne rajouter qu'un seul 0, cela ne marche pas.
Auriez-vous une idée...
Merci pour vos réponses.
Partager