KOŞULLU biçimlendirme

[çetin sönmez]

örneğimi inceleyerek yardımcı olacak arkadaşa şimdiden teşekkür ederim

 

[hikmet]

sn.çetin sönmez örnek dosya eklemeyi unuttunuz herhalde.Lütfen eklermisiniz.

 

[çetin sönmez]

dosyam ekte.unutmuşum.

 

[Levent Menteşoğlu]

Aşağıdaki kodu eklediğiniz dosyada deneyin.

[vb:1:9fc63a25bf]Sub renklendir()
For a = 2 To [c65536].End(3).Row
deg1 = Left(Cells(a, "c"), 1)
deg2 = Left(Cells(a - 1, "c"), 1)
renk = 3
If deg1 <> deg2 Then c = c + 1
If c Mod 2 = 0 Then renk = 0
Cells(a, "c").Font.ColorIndex = renk
Next
End Sub
[/vb:1:9fc63a25bf]

 

[çetin sönmez]

sağolsun LEVENT beyin yazıverdiği bu makro örneğe nasıl ve nereye uygulanır.bir arkadaş tarif edebilirmi.teşekkürler

 

[Levent Menteşoğlu]

Ekteki örneği inceleyin.

 

[çetin sönmez]

sağolun teşekkürler.bu siteyi kuranlardan Allah razı olsun.
şimdi ben bu makroyu a sütununda çalıştırmak istersem nasıl değiştireceğim.bu makroyu yeni bir çalışma kitabına nasıl uyarlayacağım.
adım adım anlatabilirmisiniz.

 

[çetin sönmez]

KOŞULLU BİÇİMLENDİRME

ben bu makrolardan anlamıyorum nereye nasıl uygulanır onu bile bilmiyorum lütfen bir arkadaş anlatıversin yada ekteki dosyaya uygulayıversin :arkadas: