Olá pessoal,

Tenho o seguinte codigo:

Private Sub ListView1_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)

    ListView1.Sorted = False
    ListView1.SortKey = ColumnHeader.Index - 1
    
    If ListView1.SortOrder = lvwAscending Then
        ListView1.SortOrder = lvwDescending
        Else
        ListView1.SortOrder = lvwAscending
    End If
ListView1.Sorted = True
End Sub

Como faço para quando clicar na barra de titulo da data por exemplo, ele me traga a ordenação pela data completa e nao pelo dia apenas?

Abraços.