Excel'de birden çok onay kutusu içeren açılır liste nasıl oluşturulur?

Birçok Excel kullanıcısı, her seferinde listeden birden çok öğe seçmek için birden çok onay kutusu içeren açılır liste oluşturma eğilimindedir. Aslında, Veri Doğrulama ile birden çok onay kutusu içeren bir liste oluşturamazsınız. Bu eğiticide, Excel'de birden çok onay kutusu içeren açılır liste oluşturmak için size iki yöntem göstereceğiz.

Birden çok onay kutusu içeren bir açılır liste oluşturmak için Liste Kutusu'nu kullanın
A: Kaynak verilerle bir liste kutusu oluşturun
B: Seçili öğeleri bulacağınız hücreyi adlandırın
C: Seçili öğelerin çıktısını almaya yardımcı olacak bir şekil ekleyin
Harika bir araçla onay kutuları içeren açılır listeyi kolayca oluşturun
Açılır liste için daha fazla öğretici ...

Birden çok onay kutusu içeren bir açılır liste oluşturmak için Liste Kutusu'nu kullanın

Aşağıda gösterilen ekran görüntüsü gibi, mevcut çalışma sayfasında, A2: A11 aralığındaki tüm isimler liste kutusunun kaynak verileri olacaktır. C4 hücresindeki düğmeye tıklamak seçili öğelerin çıktısını alabilir ve liste kutusundaki tüm seçili öğeler E4 hücresinde görüntülenecektir. Bunu başarmak için lütfen aşağıdaki işlemleri yapın.

A. Kaynak verilerle bir liste kutusu oluşturun

1. tık Geliştirici > Ekle > Liste Kutusu (Aktif X Kontrolü). Ekran görüntüsüne bakın:

2. Geçerli çalışma sayfasında bir liste kutusu çizin, sağ tıklayın ve ardından seçin Emlaklar sağ tıklama menüsünden.

3. içinde Emlaklar iletişim kutusu, aşağıdaki gibi yapılandırmanız gerekir.

• 3.1 içinde ListeFillRange kutusuna listede görüntüleyeceğiniz kaynak aralığını girin (buraya aralığı giriyorum A2: A11);
• 3.2 içinde Liste biçimi kutusunu seçin 1 - fmList Tarzı Seçeneği;
• 3.3 içinde Çoklu seçim kutusunu seçin 1 - fmMultiSelectMulti;
• 3.4 Kapatın Emlaklar iletişim kutusu. Ekran görüntüsüne bakın:

B: Seçili öğeleri bulacağınız hücreyi adlandırın

Tüm seçili öğeleri E4 gibi belirli bir hücreye çıkarmanız gerekirse, lütfen aşağıdaki işlemleri gerçekleştirin.

1. E4 hücresini seçin, girin Liste KutusuÇıktı içine isim Kutusu basın ve Keşfet tuşuna basın.

C. Seçili öğelerin çıktısını almaya yardımcı olacak bir şekil ekleyin

1. tık Ekle > Şekiller > Dikdörtgen. Ekran Bkz:

2. Çalışma sayfanıza bir dikdörtgen çizin (burada C4 hücresine dikdörtgen çiziyorum). Ardından dikdörtgeni sağ tıklayın ve Makro Ata sağ tıklama menüsünden.

3. içinde Makro Ata iletişim kutusunda, yeni düğmesine basın.

4. Açılışta Uygulamalar için Microsoft Visual Basic pencere, lütfen orijinal kodu değiştirin modül aşağıdaki VBA kodu ile pencere.

VBA kodu: Birden çok onay kutusu içeren bir liste oluşturun

Sub Rectangle1_Click()
'Updated by Extendoffice 20200730
Dim xSelShp As Shape, xSelLst As Variant, I, J As Integer
Dim xV As String
Set xSelShp = ActiveSheet.Shapes(Application.Caller)
Set xLstBox = ActiveSheet.ListBox1
If xLstBox.Visible = False Then
    xLstBox.Visible = True
    xSelShp.TextFrame2.TextRange.Characters.Text = "Pickup Options"
    xStr = ""
    xStr = Range("ListBoxOutput").Value
    
    If xStr <> "" Then
         xArr = Split(xStr, ";")
    For I = xLstBox.ListCount - 1 To 0 Step -1
        xV = xLstBox.List(I)
        For J = 0 To UBound(xArr)
            If xArr(J) = xV Then
              xLstBox.Selected(I) = True
              Exit For
            End If
        Next
    Next I
    End If
Else
    xLstBox.Visible = False
    xSelShp.TextFrame2.TextRange.Characters.Text = "Select Options"
    For I = xLstBox.ListCount - 1 To 0 Step -1
        If xLstBox.Selected(I) = True Then
        xSelLst = xLstBox.List(I) & ";" & xSelLst
        End If
    Next I
    If xSelLst <> "" Then
        Range("ListBoxOutput") = Mid(xSelLst, 1, Len(xSelLst) - 1)
    Else
        Range("ListBoxOutput") = ""
    End If
End If
End Sub

Not: Kodda, Dikdörtgen1 şekil adıdır; Liste Kutusu1 liste kutusunun adıdır; Seçenekleri Seç ve Alım Seçenekleri şeklin görüntülenen metinleridir; ve Liste KutusuÇıktı çıktı hücresinin aralık adıdır. Bunları ihtiyaçlarınıza göre değiştirebilirsiniz.

5. Basın Ara Toplam + Q kapatmak için aynı anda tuşları Uygulamalar için Microsoft Visual Basic pencere.

6. Dikdörtgen düğmesine tıkladığınızda liste kutusu katlanacak veya genişletilecektir. Liste kutusu genişlediğinde, liste kutusundaki öğeleri kontrol edin ve ardından tüm seçili öğeleri E4 hücresine çıkarmak için dikdörtgeni tekrar tıklayın. Aşağıdaki demoya bakın:

7. Daha sonra çalışma kitabını bir Excel MacroEnable Çalışma Kitabı kodu gelecekte yeniden kullanmak için.

Harika bir araçla onay kutuları içeren açılır liste oluşturun

Yukarıdaki demonun yanı sıra, bu görevi başarmak için bu özelliğin nasıl uygulanacağını gösteren adım adım bir kılavuz da sağlıyoruz. Lütfen aşağıdaki işlemleri yapın.

1. Veri doğrulama açılır listesini ayarladığınız çalışma sayfasını açın, Kutools > Açılır liste > Onay Kutulu Açılır Liste > Ayarlar. Ekran Bkz:

2. içinde Onay Kutuları Ayarları ile Açılır Liste iletişim kutusu, lütfen aşağıdaki gibi yapılandırın.

• 2.1) içinde Uygula bölümünde, açılır listedeki öğeler için onay kutuları oluşturacağınız uygulama kapsamını belirtin. Bir belirtebilirsiniz belirli aralık, mevcut çalışma sayfası, mevcut çalışma kitabı or tüm açık çalışma kitapları senin ihtiyaçlarına göre.
• 2.2) içinde Moda bölümünde, seçili öğelerin çıktısını almak istediğiniz stili seçin;
• İşte alır değiştirmek örnek olarak, bunu seçerseniz, hücre değeri seçilen öğelere göre değiştirilecektir.
• 2.3) içinde Separatör kutusuna, birden çok öğeyi ayırmak için kullanacağınız bir sınırlayıcı girin;
• 2.4) içinde Metin yönü bölümünde ihtiyaçlarınıza göre bir metin yönü seçin;
• 2.5) OK düğmesine basın.

3. Son adım, tıklayın Kutools > Açılır liste > Onay Kutulu Açılır Liste > Açılır Onay Kutuları Listesini Etkinleştir bu özelliği etkinleştirmek için.

Şu andan itibaren, belirli bir kapsamdaki açılır listeye sahip hücrelere tıkladığınızda, bir liste kutusu açılacaktır, lütfen aşağıda gösterilen demoda gösterildiği gibi hücreye çıktı vermek için onay kutularını işaretleyerek öğeleri seçin (Örnek olarak Değiştirme modunu alın ).

Bu özellikle ilgili daha fazla ayrıntı için, lütfen burayı ziyaret edin.

İlgili yazılar: