İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Açılır siyahı yaratmaq, lakin Excel-də fərqli dəyərləri necə göstərmək olar?

Excel iş səhifəsində, Data Doğrulama xüsusiyyəti ilə bir açılan siyahıdan tez bir zamanda yarada, ancaq aşağı açılan siyahısı tıkladığınızda fərqli bir dəyər göstərməyə çalışmısınız? Məsələn, Sütun A və B sütununda aşağıdakı iki sütun məlumatı var, indi, Ad sütunundakı dəyərlərlə bir açılan siyahı yaratmalıyam, amma yaratdığım açılan siyahıdan adı seçəndə, sayı sütununda göstərilən ekran görüntüsü kimi göstərilir. Bu məqalədə bu vəzifəni həll etmək üçün ətraflı məlumat veriləcək.

doc açılan müxtəlif dəyərlər 1

Açılır siyahı yaradın, ancaq siyahı hücresinin açılması üçün fərqli dəyər göstərin


Açılır siyahı yaradın, ancaq siyahı hücresinin açılması üçün fərqli dəyər göstərin

Bu vəzifəni bitirmək üçün aşağıdakı adımla addım-addım verin:

1. Aşağıdakı siyahıda istifadə etmək istədiyiniz hüceyrə dəyərləri üçün bir sıra yaradın, bu nümunədə, adın açarını daxil edin Ad qutusu, və sonra basın Daxil edin açar, bax ekran görüntüsü:

doc açılan müxtəlif dəyərlər 2

2. Sonra açılan siyahı daxil etmək istədiyiniz hüceyrələri seçin və vurun Tarix > Məlumatın yoxlanılması > Məlumatın yoxlanılması, bax ekran görüntüsü:

doc açılan müxtəlif dəyərlər 3

3. İçində Məlumatın yoxlanılması informasiya qutusu altında Parametrlər seksiyi seçin siyahı dən Imkan açılır və sonra basın doc açılan müxtəlif dəyərlər 5 düyməsini aşağıda açılmış dəyərlər kimi istifadə etmək istədiyiniz Ad siyahısı seçin mənbə mətn qutusu. Ekran görüntüsünə baxın:

doc açılan müxtəlif dəyərlər 4

4. Açılır siyahı daxil edildikdən sonra, aktiv siyahı sekmesini sağ basın və seçin Kodları baxın kontekst menyusundan və açıldı Proqramlar üçün Microsoft Visual Basic pəncərədə, boş kodu daxil edin və aşağıdakı kodu yapışdırın:

VBA kodu: açılır siyahıdan fərqli dəyər göstərin:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20161026
    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

doc açılan müxtəlif dəyərlər 6

Qeyd: Yuxarıda göstərilən kodda nömrə 5 ərzində Target.Column = 5 Sonra skript sizin açılır siyahınızın yerləşdiyi sütun nömrəsi, ""açılan"Bu da selectedNum = Application.VLookup (selectedNa, ActiveSheet.Range ("açılan"), 2, yanlış) kod, 1 addımında yaratdığınız sıra adıdır. Onları lazımlı olaraq dəyişə bilərsiniz.

5. Sonra açılır siyahıdan bir maddə seçdiyinizdə, bu kodu saxlamaq və bağlamaq, eyni kamerada nisbi fərqli bir dəyər göstərilir, ekran görünüşünə baxın:

doc açılan müxtəlif dəyərlər 7


Demo: Açılır siyahı yaradın, lakin Excel-də fərqli dəyərləri göstərin

Excel üçün Kutools: 200 gündə heç bir məhdudiyyət olmadan 60-dən çox lazımlı Excel eklentisi ilə pulsuzdur. İndi indir və pulsuz sınaq!



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    ty · 25 days ago
    this doesn't work in current versions of excel- outdated. Data validation then list no longer shows up in vba as an excel object have tried already multiple times and it doesn't show up.
  • To post as a guest, your comment is unpublished.
    Charmin · 1 years ago
    How does the formula work when you want to list the data on a separate sheet/tab in the workbook?
  • To post as a guest, your comment is unpublished.
    Charmin · 1 years ago
    How does the formula the work when you want to add the data on a separate sheet in the workbook? I want to hide the data.
    • To post as a guest, your comment is unpublished.
      Phyo · 5 months ago
      Change here bro!
      selectedNum = Application.VLookup(selectedNa, Worksheets("YourSheetName").Range("dropdown"), 2, False)
  • To post as a guest, your comment is unpublished.
    Mike K · 1 years ago
    Nothing more frustrating than typing in a detailed question only to have it blown away. If you type the wrong 6 digit code to verify your human, it wipes out the posted message. Might want to fix that.

    Now my comment is this: I tried to do the exact same thing you showed in the video and written instructions and all I get is when I select a name in the list is the name and not the number. Also, how is this even working since data validation should limit the choices to what's in the list only. How is this tricking the system?

    In the past I've always had to assign vba code to button or a shortcut, how is this code activated? How do you test to make sure it's working?
  • To post as a guest, your comment is unpublished.
    Lee Ann Brennan · 2 years ago
    What if I want to do more than one dropdown that returns different values on the same worksheet? Can you show me an example of the coding for two or more?
    • To post as a guest, your comment is unpublished.
      Tony · 5 months ago
      Lee Ann

      If you just copy and paste the code from the If to the EndIf and change the column # and Table it should work:


      Sub Worksheet_Change(ByVal Target As Range)
      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
      If Target.Column = 9 Then
      selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown1"), 2, False)
      If Not IsError(selectedNum) Then
      Target.Value = selectedNum
      End If
      End If
      End Sub

      I'm not saying this is the correct way but it worked on my test version. I'm using Excel 2013