VBA'daki liste kutusu, bir değişkene atanan ve listenin seçilebilecek çeşitli girişleri olan bir listedir, liste kutusundan aynı anda birden fazla seçenek seçebiliriz, liste kutusu seçilerek excel VBA'da bir kullanıcı formuna liste kutusu yapılabilir. kutu seçeneği ve bir liste kutusu için kullanıcı formunun üzerine çizerek, bir liste kutusunda seçilmesi için belirli değerlerin sağlandığı adlandırılmış bir aralığa sahibiz.
Excel VBA'da Liste Kutusu nedir?
Liste kutusu, kullanıcının bir öğeyi seçebileceği bir listedir. Excel VBA'daki Liste Kutusu, kullanıcıların seçebileceği değerlerin bir listesini görüntülemek istiyorsanız kullanılabilir.
Excel'de Liste Kutusu Nasıl Oluşturulur?
Excel çalışma sayfasında Liste Kutusu oluşturmak için şu adımları izleyin:
Öncelikle, VBA ve ActiveX kontrol komutlarına erişebilmeniz için, şeritte mükemmel görünmesi için Geliştirici sekmesini etkinleştirmeniz gerekir. Geliştirici sekmesini almak için Excel Seçenekleri iletişim kutusunu açın, Şeridi Excel'de Özelleştir'e tıklayın ve Geliştirici onay kutusunu seçin.
- Excel Şeridine tıklayın, ardından Geliştirici sekmesini seçin ve ardından Ekle'ye tıklayın, ardından yeni liste kutusunu excels çalışma sayfasına eklemek için Liste Kutusu denetimine tıklayın.
- Bundan sonra, excel'de Liste Kutusunu oluşturmak için excel çalışma sayfasında bir dikdörtgen çizin.
- Excel'de Liste Kutusunu seçerken, geliştirici sekmesine tıklayın ve Özellikler'i seçin. Özellikler penceresi açılacaktır.
- Özellikler penceresinde, Doldurma Aralığını Listele ayarı için Günleri - haftanın günlerini içeren adlandırılmış aralığı girin.
- Çoklu Seçim özelliğine tıklayın ve açılır listeden, aşağıdaki ekran görüntüsünde gösterildiği gibi 1-fmMultiSelectMulti'yi seçin.
- Liste Stili özelliğine tıklayın ve açılır listeden 1-fmListStyleOption seçin. Bu, aşağıdaki ekran görüntüsünde gösterildiği gibi liste öğelerinin soluna onay kutuları ekler.
- Özellikler penceresini kapatın.
Tasarım Modu'na tıklayarak Tasarım modunu kapatabilirsiniz.
Excel VBA'da Liste Kutusu Nasıl Oluşturulur?
VBA Liste Kutusunu daha iyi anlamak için aşağıdaki örneği düşünebilirsiniz:
Örnek 1
Bu liste kutusunu bir hücreye bağlamak için, liste kutusuna sağ tıklayın (tasarım modunun seçildiğinden emin olun) ve Özellikler'e tıklayın. Aşağıdaki ekran görüntüsünde gösterildiği gibi Bağlantılı Hücre için B17'yi doldurun.
Ay olarak Ay Listesi Adı, özelliklere gider ve Ay olarak Liste Doldurma aralığını seçin.
Liste kutusunda seçiminizi değiştirdiğinizde, aşağıdaki ekran görüntüsünde gösterildiği gibi B17 hücresindeki veriler değişecektir.
Örnek 2 - Bir Kullanıcı Formunda Liste Kutusu Nasıl Oluşturulur?
- Geliştirici Sekmesine gidin ve ardından Koddan Visual Basic'e tıklayın veya Alt + F11 tuşlarına basın.
- Ekle Menüsüne gidin, Kullanıcı Formu'na tıklayın.
- Araç Kutusundan Kullanıcı Formundaki Liste kutusu Kontrolünü sürükleyin.
- UserForm'a çift tıklayın ve aşağıdaki ekran görüntüsünde gösterildiği gibi Userform olayını seçin.
- Şimdi, aradaki yordama aşağıdaki kodu ekleyin.
Özel Alt UserForm_Initialize ()
ListBox1.AddItem "MBA"
ListBox1.AddItem "MCA"
ListBox1.AddItem "MSC"
ListBox1.AddItem "MECS"
ListBox1.AddItem "CA"
Sub
- Şimdi kodu çalıştırmak için 'F5'e basın.
Örnek 3 - Dinamik liste kutusu denetimi nasıl eklenir
VBA kullanarak kullanıcı formuna dinamik bir liste kutusu denetimi ekleyin.
- Araç kutusundan kullanıcı formuna bir komut düğmesi ekleyin.
- Komut düğmesine sağ tıklayın, özellikleri tıklayın.
- Komut düğmesi başlığını 'Create_Listbox' olarak değiştirin
- Komut düğmesine çift tıklayın
- Şimdi, aşağıdaki kodu gösterir.
Özel Alt CommandButton1_Click ()
Sub
- Aşağıdaki 'Add_Dynamic_Listbox' adlı prosedürü çağırın ve çalıştırmak için aşağıdaki prosedürü bulun.
Alt Add_Dynamic_Listbox ()
Dinamik Liste Kutusu ekleyin ve onu 'LstBx' nesnesine atayın
LstBx = UserForm3.Controls.Add ("Forms.ListBox.1") olarak ayarlayın
Liste Kutusu Konumu
LstBx.Left = 20
LstBx.Top = 10
Sub
- Şimdi makroyu çalıştırmak için F5'e tıklayın.
VBA'da liste kutusu denetimine öğeler nasıl eklenir?
Özel Alt Ekle _Items _To_LstBox ()
ListBox1.AddItem "Öğe 1"
ListBox1.AddItem "Öğe 2"
ListBox1.AddItem "Öğe 3"
ListBox1.AddItem "Öğe 4"
ListBox1.AddItem "Öğe 5"
Sub
VBA kullanarak liste kutusu kontrolündeki öğeler nasıl temizlenir?
Alt Clr_LstBx ()
UserForm3.ListBox1.Clear
Sub
Örnek 4
Satış verilerimiz olduğunu ve liste kutusu öğe seçimini seçerek grafik kullanıcı arayüzü satış ayrıntılarını istediğimizi varsayalım. Ardından, aşağıdaki ekran görüntülerinde gösterildiği gibi satış ayrıntılarını almak için hücre bağlantısı olarak Dizin hücresini seçin ve DÜŞEYARA formülünü uygulamalıyız.
Excel VBA'daki Liste Kutusu Hakkında Hatırlanması Gerekenler
Birden çok öğeyi seçmek için Excel'deki bir liste kutusu kullanılabilir.
