![]()
With Me.ListBox1 For i = 1 To UBound(a, 1) If a(i, 5) = myAlpha Then .AddItem .List(n, 0) = a(i, 1) .List(n, 1) = a(i, 6) .List(n, 2) = a(i, 10) <--- How do I get this line to format as "HH:MM" .List(n, 3) = a(i, 11) .List(n, 4) = a(i, 12) .List(n, 5) = a(i, 13) .List(n, 6) = a(i, 14) .List(n, 7) = a(i, 15) .List(n, 8) = a(i, 16) .List(n, 9) = a(i, 17) n = n + 1 End If Next End With
Bookmarks