KOŞULLU BİÇİMLENDİRME

[turkanet]

KOÞULLU BÝÇÝMLENDÝRME

A8:A200 arasındaki hücreleri koşullu biçimlendirme yaptım. 4 koşul koymak istiyorum. ama 3. koşuldan sonrasında ekle butonu aktif değil. koşullu biçimlendirme 3 ile sınırlı mı?

teşekkürler.

 

[Haluk]

koşullu biçimlendirme 3 ile sınırlı mı?

Evet.

 

[turkanet]

peki bu işi makro ile yapmam mümkün?

A8:A200 arasında;
M varsa hücreyi kırmızı yapsın
İ varsa hücreyi sarı yapsın
Ç varsa hücreyi yeşil yapsın
A varsa hücreyi mavi yapsın

teşekkürler

 

[turkanet]

arkadaşlar acil yardıma ihtiyacım var, bilen varsa esirgemesin lütfen :dua: :yardim:

 

[turkanet]

yardım lütfen :dua:

 

[TRABLUS]

Makro ile yardımcı olamıyorum ama, şöyle yapabilirsin belki.

Sen, 4 koşullu biçimlendirme istediğine göre 3 tanesini koşullu biçimlendirmeden yap, kalan örneğin, A varsa Mavi yap dediğin olsun, onuda veri>süz den A ları süz, çıkan A'ları mavi ile manuel olarak boya. Bilmiyorum anlatabildim mi?

 

[turkanet]

evet, bunu ben de düşündüm ama çalışmayı eşime işinde kullanması için hazırladığım ve de bu ayarları yapamayacak kadar az bildiği için son öneriyi değerlendiremem. işin kötü tarafı, akşam bu dosyayı ona götürmem gerek. makroyla bu kadar basit birşeyin yapılamamasına inanamıyorum

 

[SGM020]

arkadaşlar acil yardıma ihtiyacım var, bilen varsa esirgemesin

Üzerinde çalışıyorum.

 

[veyselemre]

eki incele

 

[SGM020]

A8:A200 arasında;
M varsa hücreyi kırmızı yapsın
İ varsa hücreyi sarı yapsın
Ç varsa hücreyi yeşil yapsın
A varsa hücreyi mavi yapsın

Ekte bir dosya gönderiyorum. Yalnız Büyük harf(İ) için duyarsız kalıyor bunu çözemedim çözen olursa ben de öğrenmiş olurum. sayın Veysel Emre'nin yaptığı dosyaya da baktım yalnız orada da küçük İ sorunu yok küçük harflere duyarsız zannedersem.

Kolay gelsin

 

[SGM020]

A8:A200 arasında;
M varsa hücreyi kırmızı yapsın
İ varsa hücreyi sarı yapsın
Ç varsa hücreyi yeşil yapsın
A varsa hücreyi mavi yapsın

Ekteki dosyada Sn, Veysel Emre'nin kodlarını da kullanınca hem küçük ve he büyük harflere duyarlı hale geldi. Belki kodlar biraz sadeleştirilerek daha kısa hale getirilebilir.

Ama benden bu kadar.

kolay gelsin.

Kolay gelsin

 

[turkanet]

Sn SGM020, emeğinize teşekkür ederim. fakat Ç harfinin büyüğü ile küçüğü farklı renk verdi. fakat, sizin iki kodu birleştirme fikrinizi Sn.veyselemre'nin a8-a200 hucre degerine gore zemin rengi dosyasında;

If Not rng Is Nothing And Target = "M" Then
Target.Interior.Color = vbRed
Exit Sub
End If

If Not rng Is Nothing And Target = "İ" Then
Target.Interior.Color = vbYellow
Exit Sub
End If

If Not rng Is Nothing And Target = "Ç" Then
Target.Interior.Color = vbGreen
Exit Sub
End If

If Not rng Is Nothing And Target = "A" Then
Target.Interior.Color = vbBlue
Exit Sub
End If

kodlarına;

If Not rng Is Nothing And Target = "m" Then
Target.Interior.Color = vbRed
Exit Sub
End If

If Not rng Is Nothing And Target = "i" Then
Target.Interior.Color = vbYellow
Exit Sub
End If

If Not rng Is Nothing And Target = "ç" Then
Target.Interior.Color = vbGreen
Exit Sub
End If

If Not rng Is Nothing And Target = "a" Then
Target.Interior.Color = vbBlue
Exit Sub
End If

kodlarını ekledim ve oldu.

yardımını esirgemeyen arkadaşlara sonsuz teşekkürler. :bravo: :dua: :hey:

 

[veyselemre]

kodların kısaltılmış hali

 

[SGM020]

kodların kısaltılmış hali

Elinize sağlık Sn,Veysel Emre...

İyi günler.

 

[turkanet]

BU DA OLDU. SONSUZ TEÞEKKÜRLER ARKADAÞLAR :dua2: :dua: :bravo: :hey: