• Home
 · 
• Miscellaneous
 · 
• ListView Sort

ListView Sort

This Is a handy code for sorting a ListView Box by whichever column header is clicked.

Rate ListView Sort

• 1
• 2
• 3
• 4
• 5

(7(7 Vote))

Private Sub ListView1_ColumnClick(ByVal ColumnHeader As MSComctlLib.ColumnHeader)
  ListView1.Sorted = True
  
  If ListView1.SortKey = ColumnHeader.Index - 1 Then
    If ListView1.SortOrder = lvwAscending Then
      ListView1.SortOrder = lvwDescending
    Else
      ListView1.SortOrder = lvwAscending
    End If
    
  Else
    ListView1.SortOrder = lvwAscending
    ListView1.SortKey = ColumnHeader.Index - 1
    
  End If
  
End Sub