Merhaba Arkadaşlar bir program yazıyorum ve bu Program üzerinde listview kullanıyorum bazı satırların bilgisi güncelleniyor ama bu güncelleme ListView içerisine gelmiyor sistemi kapatıp yeniden açtığımızda geliyor bunun sebebi ne olabilir? List View kısmını kodları aşağıdaki gibidir. Yardımlarınız için şimdiden Çok Teşekkür ederim.
Kod:
Dim rowlist As ListItem
Private Sub UserForm_Activate()
With Me.ListView1
.AllowColumnReorder = True
For colhead = 5 To 14
.ColumnHeaders.Add , , Worksheets("PO_LOG").Cells(11, colhead), 70
Next colhead
'loop for first column
For Rowitm = 12 To Worksheets("PO_LOG").Range("E99999").End(xlUp).Row
Set rowlist = .ListItems.Add(, , Worksheets("PO_LOG").Cells(Rowitm, 5))
'loop for another columns
For colitm = 6 To 14
rowlist.ListSubItems.Add , , Worksheets("PO_LOG").Cells(Rowitm, colitm)
Next colitm
Next Rowitm
End With
End Sub