Listview format horaire (probleme)

[Staple1600]

Bonsoir


Le resulat d'une inputbox rempli une cellule

Sheets(1).Cells(DerLG, 3) = Time

Dans une listview, l'affiche de la valeur de la cellule donne 0,84565656

donc je suis obligé de rusé comme cela

Sheets(1).Cells(DerLG, 3) = ''' & FormatDateTime(Time, 4)

Quelqu'un peut expliquer pourquoi l'affichage ne se fait pas au format horaire

Merci.

 

[MichelXld]

bonjour Staple1600

as tu essayé

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 , , Format(Cell.Offset(0, 2), 'hh:mm')
.ListItems(X).ListSubItems.Add , , Cell.Offset(0, 3)
.ListItems(X).ListSubItems.Add , , Cell.Offset(0, 4)
Next


bonne journée
MichelXld

 

[Staple1600]

Bonjour le forum, MichelXLD


Merci MichelXLD

Je viens de comprendrre mon erreur grace à toi

Car j'avais essayé
.ListItems(X).ListSubItems.Add , , Format(Cell.Offset(0, 3),'hh:mm')

pensant que cela correspondait à la colonne 3 de la lsitview .

Merci encore et bonne galete à des rois à tous

(enfin pour ceux que cela concernent)