Soru Koşullu biçimlendirmeye "Sayı dışı değerleri" eklemek

[seckinb]

Merhaba

tekrarlayan değerleri göstermesi için bir koşullu biçimlendirme kodu kullanıyorum.
Bu kodun içine sayı dışı değerleri de gösteren eklenti yapmak istiyorum. mümkün mü?

Sub formatduplicates()
Dim rg As Range
Set rg = Range("B2:B5000")
Dim uv As UniqueValues
Set uv = rg.FormatConditions.AddUniqueValues
uv.DupeUnique = xlDuplicate
uv.Interior.Color = vbRed
End Sub

 

[Muzaffer Ali]

Merhaba.
Bu koşullu biçimlendirmede sadece sayılar değil zaten metinsel değerler de biçimlendiriliyor.
Belki başka koşullu biçimlendirmelerden dolayı yanlış biçimlendirme olabilir.

Kodun doğru çalıştığını anlamak için yeni bir sayfada deneyin.