Excel'de verilen bir sütundan benzersiz liste (yinelenenleri kaldır) nasıl hızlıca oluşturulur?

Diyelim ki yinelenenler içeren bir isim listesi var ve şimdi bu verilen sütundan benzersiz isimlerden oluşan yeni bir liste oluşturmak istiyorsunuz, bunu Excel'de nasıl çözebilirsiniz? Bu öğretici, size verilen bir sütundan hızlıca benzersiz liste oluşturmanıza yardımcı olabilecek bazı ipuçlarını tanıtmaktadır.

Gelişmiş Filtre ile sütundan benzersiz liste oluştur

VBA ile sütundan benzersiz liste oluştur

Kutools for Excel ile sütundan hızlıca benzersiz liste oluştur

Gelişmiş Filtre ile sütundan benzersiz liste oluştur

Excel'de, listeden benzersiz verileri filtrelemek için Gelişmiş Filtre fonksiyonunu uygulayabilirsiniz.

1. Veri > Gelişmiş'e tıklayın. Ekran görüntüsüne bakın:

2. Gelişmiş Filtre iletişim kutusunda, aşağıdaki işlemleri yapın:

(1) Başka konuma kopyala seçeneğini ve yalnızca benzersiz kayıtlar seçeneğini işaretleyin;

(2) Yinelenenler sütununu Liste aralığı metin kutusuna seçin ve benzersiz listeyi kopyalamak için bir hücre seçin ve Kopyala metin kutusuna yerleştirin.

3. Tamam'a tıklayın. Şimdi benzersiz liste oluşturulmuştur. Ekran görüntüsüne bakın:

VBA ile sütundan benzersiz liste oluştur

Excel'de ayrıca, verilen bir sütundan benzersiz liste oluşturmak için VBA kodu da kullanabilirsiniz.

1. Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın ve Ekle > Modül'e tıklayın, ardından aşağıdaki VBA'yı yeni Modül penceresine kopyalayıp yapıştırın.

VBA: Verilen sütundan benzersiz liste oluştur.

Sub CreateUniqueList()
'Updateby20150519
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
InputRng.AdvancedFilter Action:=xlFilterCopy, CopyToRange:=OutRng, Unique:=True
End Sub

2. VBA kodunu etkinleştirmek için F5 tuşuna veya Çalıştır düğmesine basın ve açılan diyalogda, yinelenenleri içeren listeyi seçin ve Tamam'a tıklayın, ardından sonucu koymak için bir hücre seçin. Ekran görüntüleri:

   >>>   

3. Şimdi, benzersiz isimlerden oluşan bir liste oluşturulmuştur.

Kutools for Excel ile sütundan hızlıca benzersiz liste oluştur

Aslında, Kutools for Excel'in Yinelenenleri ve Benzersiz Hücreleri Seç özelliği ile de verilen bir sütundan hızlıca benzersiz liste oluşturabilirsiniz.

1. Benzersiz liste oluşturmak istediğiniz listeyi seçin (Sütun başlığını seçmek isteğe bağlıdır) ve Kutools > Seç > Yinelenenleri ve Benzersiz Hücreleri Seç'e tıklayın. Ekran görüntüsüne bakın:

2. Açılan diyalogda, Kural bölümünde Tüm benzersizler (İlk yineleneni dahil et) seçeneğini işaretleyin. Ekran görüntüsüne bakın:

3. Tamam'a tıklayın, ardından seçilen hücrelerin sayısını size hatırlatmak için bir diyalog çıkar. Ekran görüntüsüne bakın:

4. Tamam'a tıklayın, ardından seçilen hücreleri kopyalamak için Ctrl + C tuşlarına basın ve sonucu koymak için bir hücre seçin ve Ctrl + V tuşlarına basın.

İpucu: Değerleri büyük/küçük harf duyarlı olarak seçmek isterseniz, Yinelenenleri ve Benzersiz Hücreleri Seç diyalogunda Büyük/küçük harf duyarlı seçeneğini işaretleyebilirsiniz.

Yinelenenleri ve Benzersiz Hücreleri Seç özelliği ile yalnızca ilk yineleneni içeren yinelenenleri, ilk yineleneni hariç tutarak yalnızca yinelenenleri veya ilk yineleneni hariç tutarak tüm benzersiz değerleri seçebilirsiniz.