Bu dosya, üç farklı sütunda yer alan ve bazıları birbirini tekrar eden verileri tek bir sütunda benzersiz olarak listeler. Aynı amaca iki yöntemle ulaşılır: makro ile ve UNIQUE ile TOCOL fonksiyonlarını birlikte kullanan bir formülle.
TOCOL aralığı tek sütunlu bir diziye dönüştürür, UNIQUE ise bu dizideki tekrarları kaldırır. Türkçe Excel'de UNIQUE fonksiyonu BENZERSİZ adıyla görünür. Bu iki fonksiyon Microsoft 365 ve Excel 2021 ve sonrası sürümlerde çalışır; eski sürümlerde G1 hücresi #NAME? hatası verir, makro yöntemi ise etkilenmez.
Dosyanın içeriği
- Sayfa1: A1:C13 aralığında Adı, Pozisyon ve Konum başlıklı üç sütunluk kaynak veri bulunur. Ad, rütbe ve şehir değerlerinin bir kısmı sütunlar arasında tekrar eder.
- E sütunu: Makro çalıştırıldığında benzersiz değerler E1 hücresinden itibaren alt alta yazılır.
- G sütunu: Formülün ürettiği benzersiz liste G1 hücresinden başlar.
Kullanılan formüller
G1 hücresinde A1:C13 aralığı tek sütuna çevrilir ve yinelenen değerler ayıklanır:TOCOL aralığı tek sütunlu bir diziye dönüştürür, UNIQUE ise bu dizideki tekrarları kaldırır. Türkçe Excel'de UNIQUE fonksiyonu BENZERSİZ adıyla görünür. Bu iki fonksiyon Microsoft 365 ve Excel 2021 ve sonrası sürümlerde çalışır; eski sürümlerde G1 hücresi #NAME? hatası verir, makro yöntemi ise etkilenmez.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme veya dışarıya bağlantı gibi işlem yoktur; makro yalnızca açık sayfadaki hücreleri okur ve yazar. Kod Module1 modülündedir.- Karşılaştır: Ana makrodur. 1., 2. ve 3. sütunları Sütun_Karşılaştır yordamına gönderir; sonuç 3. sütunun sağındaki sütunu (D) atlayarak E sütununa yazılır.
- Sütun_Karşılaştır: Her sütunun boş olmayan değerlerini Scripting.Dictionary nesnesinde toplar. 1. sütundaki değerlerden 2. sütunda olmayanları, 2. sütundakilerden 1. sütunda olmayanları, 3. sütundakilerden 1. sütunda olmayanları sonuç sütununa alt alta yazar.
- Aralık: Sütunu kullanılan alanla sınırlar, böylece yalnızca dolu hücreler taranır.
- Evn: Verilen aralıktaki boş olmayan değerleri yinelenmeden bir sözlüğe ekler.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Kendi verilerinizi A, B ve C sütunlarına girin.
- Alt+F8 ile Karşılaştır makrosunu seçip çalıştırın; sonuç E sütununda 1. satırdan itibaren listelenir. Yeni bir çalıştırmadan önce E sütunundaki eski sonuçları temizleyin.
- Formül yöntemi için G1 hücresindeki formülü kendi aralığınıza göre düzenleyin.