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