Excel'de açılır listeye tik ve çarpı sembollerini nasıl eklersiniz?
Normalde, Sembol işlevini kullanarak tik ve çarpı sembollerini ekledikten sonra ve bunları veri kaynağı olarak bir açılır liste oluşturduktan sonra, sonuçlar açılır hücrelerde amaçlanan semboller yerine ü veya û olarak görüntülenir. Bu kılavuz, gerçek ✓ ve sembollerinin açılır listeden hücrelere nasıl görüntüleneceğini gösterir. Aşağıdaki VBA yöntemi, Excel'de bir tik ve çarpı açılır listesi oluşturmanıza yardımcı olacaktır.
VBA kodu ile açılır listeye tik ve çarpı sembolleri ekleme
VBA kodu ile açılır listeye tik ve çarpı sembolleri ekleme
Aşağıdaki VBA kodu ile Excel'deki belirli hücrelere tik ve çarpı açılır listeleri ekleyebilirsiniz. Lütfen şu adımları izleyin.
1. Tik ve çarpı sembolleri açılır listesi oluşturacağınız çalışma sayfasında, sayfa sekmesine sağ tıklayın ve bağlam menüsünden Görünüm Kodu'nu seçin.
2. Daha sonra Microsoft Visual Basic for Applications penceresi açılacaktır, lütfen aşağıdaki VBA kodunu Kod penceresine kopyalayın.
VBA kodu 1: Açılır listeye tik ve çarpı sembolleri ekleme
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. Ekle > Modül'e tıklayarak devam edin, ardından aşağıdaki kod 2'yi Modül penceresine kopyalayın.
VBA kodu 2: Açılır listeye tik ve çarpı sembolleri ekleme
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 çarpı açılır listesi oluşturacağınız hücre aralığıdır. Lütfen ihtiyacınıza göre aralığı değiştirin.
4. Kodu çalıştırmak için F5 tuşuna basın.
Şimdi tik ve çarpı sembolleri açılır listesi B1:B10 aralığına eklenmiştir. Açılır listeden Tik'i seçmek ✓ sembolünü hücreye eklerken, Çarpı'yı seçmek sembolünü gösterecektir. Ekran görüntüsüne bakın:
İlgili makaleler:
- Excel açılır listesinde değerleri seçerken diğer hücreleri otomatik doldurma konusunda nasıl yardımcı olur?
- Excel açılır listesinde yazarken otomatik tamamlama nasıl yapılır?
- Excel'de açılır liste takvim nasıl oluşturulur?
- Excel'de birden fazla seçim veya değer içeren bir açılır liste nasıl oluşturulur?
En İyi Ofis Verimlilik Araçları
Kutools for Excel ile Excel becerilerinizi geliştirin ve daha önce hiç olmadığı kadar verimli olun. Kutools for Excel, üretkenliğinizi artırmak ve zamanınızı kaydetmek için300'den fazla gelişmiş özellik sunar. En çok ihtiyacınız olan özelliği almak için buraya tıklayın...
Office Tab, Office'e sekmeli arayüz getirir ve işinizi çok daha kolaylaştırır
- Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Aynı pencerenin yeni sekmelerinde birden fazla belge açın ve oluşturun, yeni pencerelerde değil.
- Verimliliğinizi %50 artırır ve her gün yüzlerce fare tıklamasını azaltır!