Bu dosya, Sayfa1 üzerindeki bir ComboBox nesnesinden seçilen harcama kodu dışındaki satırların makroyla nasıl gizleneceğini gösteren örnek bir çalışmadır. Seçilen kod B3 hücresine yazılır, listedeki diğer kodların satırları gizlenir.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- Sayfa1: A3 hücresinde "harcama kodu" başlığı, B sütununda 01.3.9.03.2.1.01 ile 01.3.9.03.2.1.12 arasında değişen 12 harcama kodu yer alır. Sayfada ayrıca kodları listeleyen bir ComboBox nesnesi bulunur.
Makrolar
- Workbook_Open (ThisWorkbook): Dosya açıldığında çalışır. ComboBox1 listesini temizler, B sütunundaki son dolu satırı bulur ve B7'den son satıra kadar olan değerleri listeye ekler. Ardından ComboBox metnini "Harcama Kodu" olarak ayarlar.
- ComboBox1_Change (Sayfa1): ComboBox'ta seçim değiştiğinde çalışır. Önce tüm satırların gizlemesini kaldırır, sonra B7'den son dolu satıra kadar her hücreyi seçilen değerle karşılaştırır ve eşleşmeyen satırları gizler. Seçilen değer B3 hücresine yazılır ve B3 etkinleştirilir.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Sayfa1'deki ComboBox listesini açın ve bir harcama kodu seçin.
- Seçilen kod B3 hücresine yazılır, diğer kodların satırları gizlenir.
- Tüm satırları yeniden görmek için ComboBox'ta başka bir kod seçin; her seçimde gizleme önce sıfırlanır.
- Kendi verilerinizi kullanmak için kodları B7 ve altındaki hücrelere yazın; liste dosya her açıldığında bu hücrelerden yeniden oluşturulur.