Excel'de Benzersiz Değerleri Sayma

Bu dosya, bir listedeki benzersiz değerlerin kaç tane olduğunu üç farklı yöntemle hesaplar: dizi formülü, SUMPRODUCT formülü ve VBA ile yazılmış kullanıcı tanımlı fonksiyon (KTF). Üç yöntemin sonucu aynı hücre düzeninde yan yana karşılaştırılabilir.

Dosyanın içeriği​

• Sheet1: A2:A17 aralığında tekrarlı adların bulunduğu Adlar listesi (Adem, Barış, Cengiz, Ceren, Fahrettin, Jülide, Merve, Pınar, Serkan gibi).
• Sonuç sütunu (D2:D4): her yöntemin ürettiği benzersiz değer sayısı.
• Açıklama sütunu (H): örneklerde metin ve sayı değerlerinin kullanıldığını belirten notlar.

Kullanılan formüller​

D2 hücresinde dizi mantığıyla çalışan toplam formülü kullanılır. Her değerin listede kaç kez geçtiği COUNTIF ile bulunur, 1 bu sayıya bölünür ve sonuçlar SUM ile toplanır:
D3 hücresinde aynı hesap SUMPRODUCT ile yapılır; bu nedenle dizi formülü olarak girilmesi gerekmez:
D4 hücresi, aşağıda anlatılan KTF'yi çağırır:

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Module1 içinde tek bir fonksiyon bulunur:

• CountUnique: verilen aralıktaki her hücreyi bir Collection nesnesine anahtar olarak ekler. Aynı anahtar ikinci kez eklenemediği için tekrarlar atlanır (hata On Error Resume Next ile yok sayılır) ve koleksiyonun eleman sayısı sonuç olarak döndürülür. Application.Volatile nedeniyle fonksiyon her hesaplamada yenilenir.

Fonksiyon bir hücreye formül olarak yazıldığı için ayrıca çalıştırılması gerekmez. Kodda dosya silme ya da dış bağlantı gibi zararlı bir işlem yoktur.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. A sütunundaki listeyi kendi verinizle değiştirin.
3. Formüllerdeki A2:A17 aralığını verinizin sınırlarına göre güncelleyin.
4. D2:D4 hücrelerindeki sonuçları karşılaştırın.

Boş hücre içeren aralıklarda COUNTIF tabanlı formüller bölme hatası verebilir; bu nedenle aralık yalnızca dolu hücreleri kapsamalıdır. Dosya .xlsm biçiminde olduğundan KTF yöntemi için makro desteği gerekir.