Discussion :

[phileasdav]

Bonjour,

J'ai une listview que j'alimente avec le code ci dessous, mon problème c'est que je n'arrive pas a changer le format, comme si il ne prenait pas en compte mon code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.ListItems(.ListItems.Count).ListSubItems.Add , , cel.Offset(0, 1)

j'ai essayé de mettre ce code a la fin et au milieu (après le Add)mais c'est kiff kiff.....

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

, , NumberFormat = "0.000"

je suis allé sur le lien http://silkyroad.developpez.com/VBA/ListView/#LII-E mais je n'ai rien vu qui pourrait m'aider
Merci d'avance
Phil

[Philippe PONS]

Salut,
il faut plutôt utiliser cette ligne du tuto

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
ListView1.ListItems(2).ListSubItems.Add , , Format(1234567.89, "##,##0.00")

dans ton cas ça donne:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
.ListItems(.ListItems.Count).ListSubItems.Add , , Format(cells.Offset(0, 1), ''0.00")

[phileasdav]

Merci philippe ;

J'ai ouvert les yeux .........!! pas réveillé ce matin
Il suffisait simplement de rajouter le

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.text

a la fin du code ;

Merci quand même
Phil