Excel'de açılır liste oluşturup farklı değerler göstermek nasıl yapılır?

Excel çalışma sayfasında, Veri Doğrulama özelliği ile hızlı bir şekilde açılır liste oluşturabiliriz. Ancak, açılır listeye tıkladığınızda farklı bir değer göstermeyi denediniz mi? Örneğin, A ve B sütunlarında aşağıdaki iki sütun verisi var. Şimdi, Ad sütunundaki değerleri kullanarak bir açılır liste oluşturmalıyım, ancak oluşturulan açılır listeden bir ad seçtiğimde, aşağıdaki ekran görüntüsünde gösterildiği gibi Numara sütunundaki karşılık gelen değer görüntülenmelidir. Bu makale, bu görevi çözmek için ayrıntıları açıklayacaktır.

Açılır liste oluşturun ancak açılır liste hücresinde farklı değer gösterin

Açılır liste oluşturun ancak açılır liste hücresinde farklı değer gösterin

Bu görevi tamamlamak için lütfen aşağıdaki adımları sırayla uygulayın:

1. Açılır liste için kullanmak istediğiniz hücre değerleri için bir aralık adı oluşturun. Bu örnekte, "Ad" Kutusuna dropdown adını gireceğim ve ardından "Enter" tuşuna basacağım, aşağıdaki ekran görüntüsüne bakın:

2. Ardından, açılır listeyi eklemek istediğiniz hücreleri seçin ve "Veri" > "Veri Doğrulama" > "Veri Doğrulama" seçeneğine tıklayın, aşağıdaki ekran görüntüsüne bakın:

3. "Veri Doğrulama" iletişim kutusunda, "Ayarlar" sekmesi altında, "İzin Ver" açılır menüsünden "Liste" seçeneğini belirleyin ve ardından düğmesine tıklayarak "Kaynak" metin kutusunda açılır değer olarak kullanmak istediğiniz "Ad" listesini seçin. Aşağıdaki ekran görüntüsüne bakın:

4. Açılır liste eklendikten sonra, lütfen etkin çalışma sayfası sekmesine sağ tıklayın ve bağlam menüsünden "Kodu Görüntüle" seçeneğini seçin. Açılan "Microsoft Visual Basic for Applications" penceresinde aşağıdaki kodu boş "Modül" içine kopyalayıp yapıştırın:

VBA Kodu: Açılır listeden farklı değer göster:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    selectedNa = Target.Value
    If Target.Column = 5 Then
        selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)
        If Not IsError(selectedNum) Then
            Target.Value = selectedNum
        End If
    End If
End Sub

Not: Yukarıdaki kodda, "If Target.Column = 5 Then" betiği içindeki 5 sayısı, açılır listenizin bulunduğu sütun numarasıdır. Bu kodda, "selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)" bölümündeki "dropdown", 1. adımda oluşturduğunuz aralık adıdır. Bunları ihtiyaçlarınıza göre değiştirebilirsiniz.

5. Ardından bu kodu kaydedip kapatın. Şimdi, açılır listeden bir öğe seçtiğinizde, aynı hücrede ilgili farklı bir değer görüntülenecektir, aşağıdaki ekran görüntüsüne bakın:

Demo: Excel'de açılır liste oluşturup farklı değerler gösterme