bir useformda iki listview ve her click de artan sutün sayısı

[s_erbay]

değerli hocalarımdan yardım istiyorum. Site yöneticisiyim eskiden düzenlenmiş excel pivottable site muhasebe dosyası kullanıyorum www.excel.web.tr sitemiz üyelerinin sormuş oldukları sorular ve örnek kod lar ile kullandığım excel dosyasını daha kullanışlı olması için listview tabloları düzenledim. sorum şu : ekte örneği bulunan dosyadaki listview1 tıklandığımda listview2 de ilgili kat malikinin hesap özeti gelmektedir. İkinci tıklamada başka kat malikinin hesap özeti gelmekle beraber listview2 deki sutün sayısı artmakta ve devamında da bu durum yinelenmekteder. yardımlarınızla bu hatayı nasıl engellerim.

 

[halit3]

"Private Sub UserForm_Initialize1()" bunun içine
"With UserForm2.ListView3" bundan sonra
".ColumnHeaders.Clear" bunu ekle sütunları silecektir

 

[s_erbay]

teşekkür ederim hocam yardımlarınızla sorun çözüldü sağolun...

 

[s_erbay]

halit3 hocam size bir sorum daha olacak excel çalışma sayfasında çalışken veya gezinirken daima ekranda görünen commandButton kod'u varmı..

 

[halit3]

halit3 hocam size bir sorum daha olacak excel çalışma sayfasında çalışken veya gezinirken daima ekranda görünen commandButton kod'u varmı..

bunu denermisiniz.
çalışma sayfasının kod bölümüne koyacaksınız ve bir adet komut duğmesi ekliyeceksiniz.

Private Sub CommandButton1_Click()
MsgBox "deneme"
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.Shapes("CommandButton1").Top = ActiveCell.Offset(2, 2).Rows.Top
ActiveSheet.Shapes("CommandButton1").Left = ActiveCell.Offset(2, 2).Rows.Left
End Sub

 

[s_erbay]

halit3 hocam teşekkür ederim bu sorunuda yardımlarınızla hallettim sağolun..

 

[halit3]

halit3 hocam teşekkür ederim bu sorunuda yardımlarınızla hallettim sağolun..

iyi çalışmalar