séparateur de millier dans listbox

[corto]

Bonjour à tout le forum

j'ai une lisbox que je remplis comme cela :

tranche as long
Dim I As Long
Dim Z As Long
I = 25000
Z = 50000 + 1
While I < Z
Liste_tranche.AddItem (I)
I = I + 5000
Wend

et ensuite je récupère la valeur selectionnée :
tranche = Liste_tranche.Value

pour faire ma petite cuisine de calcul. Jusque là tout marche (grâce en partie aux infos que j'ai trouvé sur ce forum 😉

Mais voila, je voudrais qu'à l'affichage de la lisbox les nombres aient un séparateur de millier.
Quelqu'un aurait-il une idée, et qu'elle ne remettent pas en cause la recup de la valeur sélectionnée dans la listbox.

J'en ai aussi mais je ne sais pas comment faire...
Est ce qu'il une propriété dans la listbox qu'on modifier ?

Ou bien faire 2 colonnes dans la listbox: 1 en format texte et 1 en format nombre.
Ne faire apparaitre que le colonne format texte et récupérer la valeur de la colonne nombre.

Merci d'avance

 

[Hervé]

Bonjour corto, le forum




🙂

Essaye comme ceci, afin de forcer le format : Liste_tranche.AddItem Format(I, '##,##0')

ps : ca bugue pas sur tranche as long ? il manque pas un petit dim au début 😉

salut

 

[corto]

Un gran MERCI hervé

pour tranche, en effet j'avais oublié de copier le Dim :sick:


Bonne fin de journée et merci encore