Tahnk's for your answer
, but the problem is still there.


Here's the code
and I've still 0,xxxx in the listview

So i do this
the value o f the cell
= "'" & FormaDateTime(Time,4) but i wan't to know how to format the listview properly.

[vba]With ListView1
With .ColumnHeaders
.Clear
.Add , , "AAA", 60
.Add , , "BBB", 60
.Add , , "HEURE", 60
.Add , , "DDD", 80
End With

For Each Cell In Sheets(1).Range("A2:A11")
X = X + 1
.ListItems.Add , , Cell
.ListItems(X).ListSubItems.Add , , Cell.Offset(0, 1)
.ListItems(X).ListSubItems.Add , , Cell.Offset(0, 2)
.ListItems(X).ListSubItems.Add , , Format(Cell.Offset(0, 3), "hh:mm")
.ListItems(X).ListSubItems.Add , , Cell.Offset(0, 4)
Next

End With[/vba]