Excel'de bir sütun aralığından dinamik olarak benzersiz değerler listesi nasıl oluşturulur?
Değerleri düzenli olarak değişen bir sütun aralığınız varsa ve bu aralıktaki tüm benzersiz değerleri, ne kadar değişirse değişsin her zaman yakalamanız gerekiyorsa, dinamik bir benzersiz değer listesi oluşturmanın yolu nedir? Bu makale, tam da bunu nasıl başaracağınızı size gösterecek.
Formül kullanarak bir sütun aralığından dinamik olarak benzersiz değerler listesi çıkarın
VBA kodu kullanarak bir sütun aralığından dinamik olarak benzersiz değerler listesi çıkarın
Formül kullanarak bir sütun aralığından dinamik olarak benzersiz değerler listesi çıkarın
Aşağıdaki ekran görüntüsünde gösterildiği gibi, B2:B9 aralığından dinamik olarak benzersiz bir değerler listesi oluşturmanız gerekiyor. Lütfen aşağıdaki dizi formülünü deneyin.
1. D2 gibi boş bir hücre seçin, aşağıdaki formülü girin ve aynı anda Ctrl+Shift+Enter tuşlarına basın. (B2:B9, benzersiz değerleri çıkarmak istediğiniz sütun verisidir; D1 ise formülünüzün bulunduğu hücrenin hemen üstündeki hücredir.)
=IFERROR(INDEX($B$2:$B$9, MATCH(0,COUNTIF($D$1:D1, $B$2:$B$9), 0)),"")
2. D2 hücresini seçili tutun ve "Sınırlı Aralık"tan tüm benzersiz değerleri almak için Dolgu Kulpu'nu aşağı doğru sürükleyin.
Artık B2:B9 sütun aralığındaki tüm benzersiz değerler çıkarıldı. Bu aralıktaki değerler değiştiğinde, benzersiz değer listesi anında dinamik olarak güncellenir.
Excel'de bir aralıktaki tüm benzersiz değerleri kolayca seçin ve vurgulayın:
Yinelenen/Benzersiz Hücreleri Seç yardımcısı, Kutools for Excel ile tüm benzersiz değerleri (ilk yinelenenleri dahil ederek) veya yalnızca bir kez görünen benzersiz değerleri kolayca seçip vurgulamanızı sağlar; ayrıca aşağıda ekran görüntüsünde gösterildiği gibi ihtiyacınıza göre Yinelenen Değerler’i de belirleyebilirsiniz.
Kutools for Excel'i şimdi indirin! (30 günlük ücretsiz deneme)
VBA kodu kullanarak bir sütun aralığından dinamik olarak benzersiz değerler listesi çıkarın
Ayrıca, aşağıdaki VBA kodunu kullanarak bir sütun aralığından dinamik olarak benzersiz değerler listesi oluşturabilirsiniz.
1. Aynı anda Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.
2. Microsoft Visual Basic for Applications penceresinde, Ekle > Modül’e tıklayın. Ardından aşağıdaki VBA kodunu Modül penceresine kopyalayıp yapıştırın.
VBA kodu: Bir aralıktan benzersiz değerler listesi çıkarın
Sub CreateUniqueList()
Dim xRng As Range
Dim xLastRow As Long
Dim xLastRow2 As Long
Dim I As Integer
On Error Resume Next
Set xRng = Application.InputBox("Please select range:", "Kutools for Excel", Selection.Address, , , , , 8)
If xRng Is Nothing Then Exit Sub
On Error Resume Next
xRng.Copy Range("D2")
xLastRow = xRng.Rows.Count + 1
ActiveSheet.Range("D2:D" & xLastRow).RemoveDuplicates Columns:=1, Header:=xlNo
xLastRow2 = Cells(Rows.Count, "B").End(xlUp).Row
For I = 1 To xLastRow2
If ActiveSheet.Range("D2:D" & xLastRow2).Cells(I).Value = "" Then
ActiveSheet.Range("D2:D" & xLastRow2).Cells(I).Delete
End If
Next
End SubNot: Kodda D2, benzersiz değer listesinin yerleştirileceği hücredir. İhtiyacınıza göre değiştirebilirsiniz.
3. Çalışma sayfasına geri dönün ve Ekle > Şekiller > Dikdörtgen seçeneğine tıklayın. Ekran görüntüsüne bakın:
4. Çalışma sayfanıza bir dikdörtgen çizin ve üzerine görüntülenmesini istediğiniz metni yazın. Ardından dikdörtgene sağ tıklayıp bağlam menüsünden Makroyu Ata seçeneğini seçin. Makroyu Ata iletişim kutusunda, Makro adı kutusundan CreateUniqueList öğesini seçin ve ardından Tamam düğmesine tıklayın. Ekran görüntüsüne bakın:
5. Artık dikdörtgen düğmesine tıkladığınızda, Kutools for Excel iletişim kutusu açılır; buradan çıkarılacak benzersiz değerleri içeren aralığı lütfen seçin, ardından Tamam düğmesine tıklayın.
Artık yukarıdaki 5 adımını tekrarlayarak benzersiz değer listesini otomatik olarak güncelleyebilirsiniz.
İlgili makaleler:
- Excel'de dinamik bir aylık takvim nasıl oluşturulur?
- Excel'de bir hücreye bağlı olarak, o hücrenin değerine göre resim nasıl eklenir veya dinamik olarak yerleştirilir?
- Excel'de başka bir sayfaya dinamik hiperlink nasıl oluşturulur?
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar