/ / Excel VBA Liste Kutusu

Excel VBA Liste Kutusu

Liste kutusu, kullanıcının bir öğeyi seçebileceği bir listedir. Oluşturmak için liste kutusu içinde Excel VBAaşağıdaki adımları uygulayın.

1. Geliştirici sekmesinde, Ekle'ye tıklayın.

2. ActiveX Denetimleri grubunda, Liste Kutusu'nu tıklatın.

Excel VBA'da bir liste kutusu oluşturun

3. Çalışma sayfanızdaki bir liste kutusunu sürükleyin.

Liste Kutusu'nu sürükleyin

Not: Bir kontrolün ismini kontrol üzerine sağ tıklayarak değiştirebilirsiniz (Tasarım Modunun seçili olduğundan emin olun) ve ardından Özellikler'e tıklayın. Şimdilik, ListBox1'i liste kutusunun adı olarak bırakacağız.

Bir Çalışma Kitabı Açık Etkinlik oluşturun. Çalışma kitabını açtığınızda, Çalışma Kitabı Açık Etkinliğine eklenen kod, Excel VBA tarafından yürütülecektir.

4. Visual Basic Düzenleyicisi'ni açın.

5. Bu Çalışma Kitabını Proje Gezgini'nde çift tıklatın.

6. Soldaki açılır listeden Çalışma Kitabı'nı seçin ve sağdaki açılır listeden Aç'ı seçin.

Excel VBA Çalışma Kitabı Açık Etkinlik

7. Liste kutusuna öğe eklemek için, Çalışma Kitabı Açık Etkinliğine aşağıdaki kod satırlarını ekleyin:

With Sheet1.ListBox1
    .AddItem "Paris"
    .AddItem "New York"
    .AddItem "London"
End With

Not: Liste kutusunun ikinci çalışma sayfasında yer alması durumunda Sayfa2'yi, liste kutusunun üçüncü çalışma sayfasında yer alması durumunda Sayfa3'ü kullanın. Bu kod satırlarını Çalışma Kitabı Aç olayı dışında kullanırsanız, aşağıdaki kod satırını bunlardan önce eklemek isteyebilirsiniz. kod satırları. Bu kod satırı liste kutusunu temizler. Bu şekilde, kodunuzu birden fazla kez çalıştırırsanız öğeleriniz birden çok kez eklenmez.

ListBox1.Clear

8. Bu liste kutusunu bir hücreye bağlamak için liste kutusuna sağ tıklayın (tasarım modunun seçili olduğundan emin olun) ve Özellikler'e tıklayın. LinkedCell için D3'ü doldurun.

LinkedCell

Not: ayrıca bir dizi hücre ile liste kutusu doldurmak için ListFillRange özelliğine bakın.

9. Excel dosyasını kaydedin, kapatın ve yeniden açın.

Sonuç:

Liste kutusu

Bazı durumlarda, çalışma sayfanıza doğrudan bir liste kutusu yerleştirmek yararlı olabilir, ancak bir liste kutusu, bir Userform'a yerleştirildiğinde özellikle yararlıdır.

Ayrıca oku: