Bu dosya, bir UserForm üzerindeki ListBox'ta birden fazla sütunun nasıl gösterileceğini örnekleyen küçük bir çalışmadır. Sayfadaki ürün ve stok bilgileri form üzerinde listelenir; listeden bir satıra tıkladığınızda aynı satır çalışma sayfasında seçilir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- Sheet1: A1:C12 aralığında, ürün listesi bulunur. Başlıklar Ürünler ve Stokta sütunlarındadır. Örnek kayıtlar: Sarı T-Shirt (Evet), Lacivert Pantolon (Evet), Yeşil Kazak (Hayır), Lacivert T-Shirt (Evet), Kırmızı Kazak (Evet).
- UserForm1: İçinde ListBox1 ve OKButton bulunan form.
- Module1: Formu açan makroyu içerir.
Makrolar
Dosyada formül yoktur, işlemler makrolarla yapılır. Kodlarda dosya silme, dışarıya bağlantı gibi zararlı bir işlem görülmemiştir.- ShowUserForm (Module1): UserForm1'i ekrana getirir. Formu bu makroyla başlatırsınız.
- ListBox1_Click (UserForm1): Listede bir satır seçildiğinde, seçilen satırın sıra numarasına göre sayfadaki A:C sütunlarındaki ilgili satırı seçer. Hesaplamada başlık satırı dikkate alınır ve veriler 2. satırdan başlıyormuş gibi işlem yapılır.
- OKButton_Click (UserForm1): Formu kapatır.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Alt+F8 tuşlarıyla makro listesini açıp ShowUserForm makrosunu çalıştırın.
- Açılan formda listedeki bir satıra tıklayın; Sheet1 üzerinde aynı kayıt seçilir.
- İşiniz bitince OK düğmesiyle formu kapatın.
- Kendi verinize uyarlamak için Sheet1'deki listeyi değiştirin ve VBA düzenleyicisinde UserForm1'in ListBox özelliklerini (sütun sayısı, başlık gösterimi) kendi tablonuza göre ayarlayın.