Format Nombre ListBox

[g.mir87]

Bonjour à tous,

Je viens vers vous car j'ai un soucis de formatage d'une listbox.
Je m'explique.
J'alimente une listbox (située en Feuil2) à partir d'une base de données (située en Feuil1).
J'alimente cette listbox avec des nombres du type 40912.0931
Le problème est que quand j'importe mes valeurs, ma listbox remplace le point par une virgule!
J'obtiens donc dans ma list box 40912,0931

Comment serait-il possible de conserver le format d'origine?
J'ai cherché un peu partout mais je n'ai pas trouvé réponse à mon problème.
Une petite idée?

Je joins en PJ un fichier pour qe vous compreniez mieux mon soucis.

Merci d'avance pour votre aide.

Guillaume

 

[supercrapaud]

Re : Format Nombre ListBox

Bonjour,

Tes données saisies dans ta feuille 1 sont inscrites avec une virgules! donc ta listbox reprend la même chose. Il s'agirait en fait de modifier les options d'Excel pour que soient remplacés les virgules par des points (comme les américains). Mais je ne sais plus où c'est.

 

[g.mir87]

Re : Format Nombre ListBox

Dans mon fichier les données d'origine s'affichent avec un point. N'étant pas en France je pense que le problème vient de là.
Plutôt que de modifier les options d'excel, n'y a t-il pas un moyen lors de l'alimentation de la listbox de modifier la virgule par un point? Du style avec une formule replace ou quelque chose du genre?

 

[supercrapaud]

Re : Format Nombre ListBox

Ce serait un truc du genre
listbox1 = range("a1:a5").Replace What:=",", Replacement:=".", LookAt:=xlPart, SearchOrder _:=xlByRows, MatchCase:=False

à tester