listview'de sıralama yapmak isteyenler buraya :)

[emrexcel123]

aşağıdaki kodları deneyerek buldum paylaşmak istedim...

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

iyi akşamlar...

 

[hsayar]

hocam bir örnek eklersen daha çok sevinirim

 

[Mahmut Kök]

hocam bir örnek eklersen daha çok sevinirim

Aşağıdaki adreste açıklama ve de küçük bir örnek dosya mevcut.

http://www.excel.web.tr/showthread.php?p=227041#post227041