ASMET67
Altın Üye
- Katılım
- 8 Haziran 2007
- Mesajlar
- 410
- Excel Vers. ve Dili
- Excel 2016
- Altın Üyelik Bitiş Tarihi
- 30-11-2027
Merhaba.
Excelin Giris isimli sayfasına Listview nesnesini dosya her açılışta eklemek mümkünmü?
Sayfaya manuel elle eklediğim listwiev nesnesi dosya açıkken çalışıyor ama dosyayı kapatıp açtığımda çalışmıyor. aşağıdaki kırmızı kod satırı hata veriyor.
Sayfadaki listviewi kaldırıp tekrar ekleyince hata vermiyor.
Bunun önüne nasıl geçebilirim?
Excelin Giris isimli sayfasına Listview nesnesini dosya her açılışta eklemek mümkünmü?
Sayfaya manuel elle eklediğim listwiev nesnesi dosya açıkken çalışıyor ama dosyayı kapatıp açtığımda çalışmıyor. aşağıdaki kırmızı kod satırı hata veriyor.
Sayfadaki listviewi kaldırıp tekrar ekleyince hata vermiyor.
Bunun önüne nasıl geçebilirim?
Kod:
Dim liste1 As Object
Dim s1 As Worksheet
Dim liste2 As Object
Set s1 = ThisWorkbook.Worksheets("Ana")
Set liste1 = ThisWorkbook.Worksheets("Ana").ListView1 'hata verdiği Satır
liste1.ListItems.Clear
liste1.ColumnHeaders.Clear
Set liste2 = ThisWorkbook.Worksheets("Ana").ListView2 'hata verdiği Satır
liste2.ColumnHeaders.Add , , "Alt Menu", 235