• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

rengarenk

Katılım
21 Ağustos 2006
Mesajlar
41
Excel Vers. ve Dili
2010 TR
Merhaba,

bir sutunda yukarıdan aşağıya doğru alt alta yazılmış ali-ali-ai-veli -zeki-zeki-ayşe-ayşe gibi ibareler var . yukarıdan aşağı doğru inerken her isim değiştiğinde bu grupların otomatik olarak farklı renge boyanmasını istiyorum .

teşekkürler.

not:dosya ekleyemediğim için yazarak anlattım.
 
Katılım
2 Mart 2007
Mesajlar
603
Excel Vers. ve Dili
2003
Metin ler deki değişkenlerin sayısı önemli çünkü excel de kullanılabilir bir renk sayısı var.(Sanırım 255 di)
Ali ve veli verisinine göre A:A aralığına renk verir.
makro lu bir çözüm

Sub renkver()
Set St = Range("A:A")
Dim hucre As Range
For Each hucre In St
If hucre = "Ali" Then
hucre.Font.ColorIndex = 2
hucre.Interior.ColorIndex = 3
End If
If hucre = "veli" Then
hucre.Font.ColorIndex = 5
hucre.Interior.ColorIndex = 6

End If
Next
End Sub
 
Üst