[VBA-E] Afficher les 0 devant un nombre

skual · 29/05/2006, 10h06

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 :

 
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 :

 
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.

SilkyRoad · 29/05/2006, 10h43

bonjour

tu peux essayer

Code :

Cells(i, 3).Value = "'0" & buf

bonne journée
michel

skual · 29/05/2006, 10h58

OK ça fonctionne parfaitement bien avec ça.

Merci Michel et bonne journée.

29/05/2006, 10h06	#1 (permalink)
skual Membre du Club Date d'inscription: janvier 2006 Localisation: Sud Ouest Messages: 90	[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 : 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 : 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. __________________ « Il vaut mieux être saoul que con, ça dure moins longtemps! »

29/05/2006, 10h43	#2 (permalink)
SilkyRoad Responsable Excel Date d'inscription: août 2005 Messages: 3 157	bonjour tu peux essayer Code : Cells(i, 3).Value = "'0" & buf bonne journée michel

29/05/2006, 10h58	#3 (permalink)
skual Membre du Club Date d'inscription: janvier 2006 Localisation: Sud Ouest Messages: 90	OK ça fonctionne parfaitement bien avec ça. Merci Michel et bonne journée. __________________ « Il vaut mieux être saoul que con, ça dure moins longtemps! »

		Forum des développeurs > Hardware, Systèmes et Logiciels > Microsoft Office > Excel > VBA Excel
[VBA-E] Afficher les 0 devant un nombre

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email