ListBox Tıkladığında Veri Ekleme

Merhabalar,

frmPersonelListesi adlı UserForm’da bulunan ListBox’tan seçtiğiniz veriyi, “Kart_Basmayan” sayfasındaki F hücresine eklemek için aşağıdaki adımları izleyebilirsiniz:

1. ListBox’ta Seçim Yapıldığında Veri Aktarma:​

ListBox’ta bir öğe seçildiğinde, bu öğeyi belirli bir hücreye aktarmak için ListBox’ın Click veya DblClick (çift tıklama) olayını kullanabilirsiniz.

Örneğin, ListBox’ta bir öğe seçildiğinde bu değeri “Kart_Basmayan” sayfasındaki F1 hücresine yazdırmak için:
Bu kod, ListBox’ta seçilen değeri alır ve “Kart_Basmayan” sayfasındaki F1 hücresine yazar.

2. Belirli Bir Hücreye Çift Tıklandığında ListBox Açma:​

Eğer belirli bir hücreye çift tıkladığınızda bir ListBox açılmasını ve buradan seçilen değerin o hücreye yazılmasını istiyorsanız, aşağıdaki adımları izleyebilirsiniz:

1. Geliştirici Sekmesini Aktifleştirin: Excel’de “Dosya” > “Seçenekler” > “Şeridi Özelleştir” yolunu izleyerek “Geliştirici” sekmesini etkinleştirin.
2. ListBox Ekleyin: Geliştirici sekmesindeki “Ekle” menüsünden “ListBox” kontrolünü seçerek çalışma sayfasına ekleyin.
3. VBA Kodunu Ekleyin: Çalışma sayfasının kod penceresine aşağıdaki kodu ekleyin:

Bu kod, F1 hücresine çift tıkladığınızda bir UserForm (örneğin, UserForm1) açar. Bu UserForm’da bulunan ListBox’tan seçilen değer, F1 hücresine yazdırılabilir.

1. UserForm ve ListBox Ayarları: UserForm’a bir ListBox ekleyin ve bu ListBox’ın DblClick olayına aşağıdaki kodu ekleyin:

Bu kod, ListBox’ta çift tıklanan değeri alır, “Kart_Basmayan” sayfasındaki F1 hücresine yazar ve UserForm’u kapatır.

Bu yöntemlerle, ListBox’tan seçtiğiniz veriyi istediğiniz hücreye aktarabilirsiniz.

Sorun çözülmüştür teşekkür ederim.