I have created a listbox using the following code:

With ThisWorkbook.Sheets("inventory")
vList = .Range("a2", .Range("a2").End(xlDown).Offset(0, 3))
End With
Me.lst_inventory.ListStyle = fmListStyleOption
frm_inventory.lst_inventory.List = vList

The last two columns are start and end times, formatted as HH:MM AM/PM on
the worksheet.

When brought into the Listbox, the times are shown as their serial numbers
(ie .2500). Is there a way to format the appearance of the time fields in
the Listbox using the method of creating the listbox as shown above?

Thanks.