Makrolar ile Yinelenen Hücreleri Boyama

Bu dosya, Excel VBA ile yinelenen değerlerin farklı yöntemlerle renklendirilmesini örnekleyen makro koleksiyonudur. Yinelenen hücreler kırmızı dolgu rengiyle işaretlenir, boyamalar tek makroyla temizlenir ve yinelenen hücrelerin sayısı mesaj kutusunda gösterilir. Kodlar hem öğrenmek hem de kendi çalışma dosyalarına uyarlamak için kullanılabilir.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sheet1: A1:T32 aralığında, "Months" başlığı altında aylara göre sıralanmış günlük sayısal değerlerden oluşan örnek veri tablosu bulunur. Satırlar Day 1, Day 3, Day 4 gibi gün etiketleriyle ilerler. Veri alanı Table1 adlı Excel tablosudur.
• Module1: Altı makro içeren VBA modülü.

Dosyada formül bulunmaz; tüm işlem makrolarla yapılır.

Makrolar​

• DuplicateValuesFromSelection: Seçili alandaki hücreleri tek tek kontrol eder, aynı değer seçim içinde birden fazla geçiyorsa hücreyi kırmızıya boyar.
• DuplicateValuesFromRow: İkinci satırdan başlayarak her satırı B sütunundan itibaren ayrı ayrı tarar ve yalnızca aynı satır içindeki yinelenen değerleri boyar.
• DuplicateValuesFromColumns: Aynı mantığı sütun bazında uygular; her sütunun kendi içindeki yinelenen değerler boyanır.
• DuplicateValuesFromTable: Table1 içindeki tüm hücreleri birlikte değerlendirir ve tablo genelinde tekrar eden değerleri boyar.
• CountDuplicates: Table1 içinde değeri birden fazla geçen hücrelerin sayısını hesaplar ve MsgBox ile gösterir.
• ClearAll: Table1 üzerindeki dolgu renklerini kaldırır.

CountIf ile yapılan karşılaştırma WorksheetFunction üzerinden çalışır. Kodda dosya silme ya da dışarıya bağlantı gibi işlem yoktur; makrolar yalnızca hücre dolgu rengini değiştirir.

Nasıl kullanılır​

1. Dosyayı açın ve güvenlik uyarısında makroları etkinleştirin.
2. Seçim üzerinden denemek için bir alan seçin, Alt+F8 ile DuplicateValuesFromSelection makrosunu çalıştırın.
3. Satır, sütun ya da tablo bazlı kontrol için ilgili makroyu aynı yolla seçip çalıştırın.
4. Yinelenen hücre sayısını görmek için CountDuplicates makrosunu çalıştırın.
5. Yeni bir yöntem denemeden önce ClearAll ile boyamaları temizleyin.
6. Kendi verinizde kullanmak için Alt+F11 ile modülü açıp kodu uyarlayın. Tablo tabanlı makrolar Table1 adına bağlıdır; kendi tablonuzun adını kodda değiştirmeniz gerekir.