décimale dans list box

[JC de Lorient]

Bonjour a vous tous
voilà dans cette partie de code en listBox1.list(y,4) je récupère un nombre jusque là pas de soucis
si j'ai 1234.56 je récupère 1234.56 mais si j'ai un chiffre rond je récupère pas le ,00
malgré ma recherche sur les anciens posts suis tjrs au même point.
Y a til une soluce ?
Merci pour l'aide
JC

Sheets('Recap').Select
y = 0
For x = 2 To Range('A65536').End(xlUp).Row
ListBox1.AddItem Range('A' & x)
ListBox1.List(y, 1) = Sheets('Recap').Range('B' & x)
ListBox1.List(y, 2) = Sheets('Recap').Range('C' & x)
ListBox1.List(y, 3) = Sheets('Recap').Range('D' & x)
ListBox1.List(y, 4) = Sheets('Recap').Range('E' & x)
ListBox1.List(y, 5) = Sheets('Recap').Range('F' & x)
y = y + 1
Next

 

[Hervé]

Bonjour jc , le forum

par format :

ListBox1.List(y, 4) = format(Sheets('Recap').Range('E' & x), '##,##0.00')

salut

 

[PascalXLD]

Bonjour

il est pas un peu bizarre ton format Hervé ??

TOn clone a encore sévi :evil:

je pense à

ListBox1.List(y, 4) = format(Sheets('Recap').Range('E' & x), '0.00')

Message édité par: Pascal76, à: 06/02/2006 12:02

 

[Hervé]

re jc , salut pascal



quoi mon format ?

qu'est ce qui la mon format ?

il te plait pas mon format ?

(j'ai le johnny qui pousse moi)

sérieusement, ce format permet en plus d'avoir la séparation des milliers.

salut

Message édité par: hervé, à: 06/02/2006 12:06

 

[JC de Lorient]

re

pas de bagarre !!!! LOL

merci a vous deux pour vos conseils !
bonne journée

JC

 

[PascalXLD]

Arf

excuse-moi

Comme je n'utilise jamais le séparateur virgule comme séparateur de millier j'avais cru à une erreur de copier-coller ou au passage intempestif d'un clone

 

[JC de Lorient]

re

pas de bagarre !!!! LOL

merci a vous deux pour vos conseils !
bonne journée

JC