Ana içeriğe atla

Excel'de açılır listeye onay ve çapraz semboller nasıl eklenir?

Normalde, sembol işlevli hücrelere tik ve çarpı sembolleri ekledikten ve ardından veri kaynağı olarak bunlarla açılır listeler oluşturduktan sonra, sonuçlar aşağı açılan hücrelerde ü veya û olarak görüntülenecektir. Gerçek nasıl görüntülenir ✓ ve açılır listeden öğeler seçildikten sonra hücrelerdeki semboller? Aşağıdaki VBA yöntemi, Excel'de bir onay ve çapraz açılır liste oluşturmaya yardımcı olacaktır.

VBA kodu ile açılır listeye onay ve çapraz semboller ekleyin


VBA kodu ile açılır listeye onay ve çapraz semboller ekleyin

Aşağıdaki VBA kodu ile, Excel'de belirtilen hücrelere işaretli ve çapraz açılır listeleri ekleyebilirsiniz. Lütfen aşağıdaki işlemleri yapın.

1. Çalışma sayfasında işaret ve çapraz semboller açılır listeleri oluşturacak, sayfa sekmesine sağ tıklayıp Kodu Görüntüle bağlam menüsünden.

2. Sonra Uygulamalar için Microsoft Visual Basic penceresi açılır, lütfen aşağıdaki VBA kodunu Kod penceresine kopyalayın.

VBA kodu 1: Açılır listeye onay ve çapraz semboller ekleyin

Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 20180703
    If Intersect(Target, Range("B1:B10")) Is Nothing Then Exit Sub
    If Target.Value = "Tick" Then
        Target.Value = "P"
    ElseIf Target.Value = "Cross" Then
        Target.Value = "S"
    End If
End Sub

3. Tıklamaya gidin Ekle > modül, ardından aşağıdaki kodu 2 Modül penceresine kopyalayın.

VBA kodu 2: Açılır listeye onay ve çapraz semboller ekleyin

Sub usingSymbols()
'Update by Extendoffice 20180703
    Dim xRg As Range
    Set xRg = Range("B1:B10")
    xRg.Font.Name = "Wingdings 2"
    xRg.Validation.Add xlValidateList, , , "Tick,Cross"
End Sub

not: Yukarıdaki kodda, B1: B10, tik ve çapraz açılır liste oluşturacağınız hücre aralığıdır. Lütfen aralığı ihtiyaç duyduğunuz şekilde değiştirin.

4. Tuşuna basın. F5 kodu çalıştırmak için anahtar.

Şimdi onay ve çarpı sembolleri açılır listeleri B1: B10 aralığına eklenir. Açılır menüden Tick'i seçin ✓ hücreye eklenir ve Cross'u seçin. sembol. Ekran görüntüsüne bakın:


İlgili yazılar:

En İyi Ofis Üretkenlik Araçları

🤖 Kutools AI Yardımcısı: Aşağıdakilere dayalı olarak veri analizinde devrim yaratın: Akıllı Yürütme   |  Kodunu oluşturun  |  Özel Formüller Oluşturun  |  Verileri Analiz Edin ve Grafikler Oluşturun  |  Kutools İşlevlerini Çağır...
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya Tanımla   |  Boş Satırları Sil   |  Veri Kaybı Olmadan Sütunları veya Hücreleri Birleştirin   |   Formülsüz Tur ...
Süper Arama: Çoklu Ölçütlü VLookup    Çoklu Değer VLookup  |   Birden Çok Sayfada VLookup   |   Bulanık Arama ....
Gelişmiş Açılır Liste: Hızla Açılır Liste Oluşturun   |  Bağımlı Açılır Liste   |  Çoklu Seçim Açılır Liste ....
Sütun Yöneticisi: Belirli Sayıda Sütun Ekleme  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  |  Aralıkları ve Sütunları Karşılaştırın ...
Öne Çıkan Özellikler: Izgara Odağı   |  Tasarım görünümü   |   Büyük Formül Çubuğu    Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynak Kütüphanesi (Otomatik metin)   |  Tarih Seçici   |  Çalışma Sayfalarını Birleştirin   |  Hücreleri Şifrele/Şifresini Çöz    E-postaları Listeye Göre Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtre...) ...
En İyi 15 Araç Seti12 Metin Tools (Metin ekle, Karakterleri Kaldır, ...)   |   50+ Grafik Türleri (Gantt şeması, ...)   |   40+ Pratik Formüller (Yaşı doğum gününe göre hesapla, ...)   |   19 sokma Tools (QR Kodunu Girin, Yoldan Resim Ekle, ...)   |   12 Dönüştürme Tools (Sayılardan Kelimelere, Para Birimi Dönüştürme, ...)   |   7 Birleştir ve Böl Tools (Gelişmiş Kombine Satırları, Bölünmüş hücreler, ...)   |   ... ve dahası

Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar.  En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...

Açıklama


Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir

  • Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
  • Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
  • Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations