Çözüldü VBA ile Yazı Rengini Hücre Değerine Göre Ayarlama

Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...

ErolU

Normal Üye
Excel Versiyonu
Excel 2021
Excel Sürümü
64 Bit
Excel Dili
Türkçe
Arkadaşlar,
D:5:H28 arasındaki satırların rengini B sütunundaki değere göre kırmızı yapmak istiyorum.
Yani
B5:B28 arasındaki hücrelerin hangilerinde 1 yazıyorsa D:5:H28 arasındaki satırlar kırmızı renkli olsun.
İşlemi makro ile bir butona bağlayarak yapmak istiyorum.
Ekli dosyada bir örnekle durumu açıklamaya çalıştım.
Yardımlarınızı rica ediyorum.
 

Ekli dosyalar

Son düzenleme:
Çözüm
@ErolU.

İsteği ve mevcut kodlarınızın yaptığı işlemin tam olarak anlaşılması için;
mevcut Worksheet_Change kodunun tümünü (başlık ve end sub satırı dahil) geçici olarak PASİF hale getirin veya SİLİN.

Bunun yerine, şu kodu ekleyip denemeler yapın.
KIRMIZI yazı rengi konusunu sanırım tam anlayamadım, A sütunundaki 1'leri elle mi yazıyorsunuz, bir formülün sonucu mudur?

Bir öneri olarak da; tablo dışında olmak üzere her bir renklendirme türü için, birer hücreyi kılavuz olarak kullanabilirsiniz ve
bu kılavuz hücredeki renkleri elle istediğiniz gibi değiştirip, tablonuzdaki renkleri, makro koduna müdahale etmeden
daha esnek olarak belirleyebileceğinizi aklınızda tutun.
Örneğin BA1 hücresini başlık alanlarının olmasını...
@ErolU.
Bu işlem için makro / düğme vs kullanmaya gerek var mı?
Koşullu biçimlendirme işinizi görür.

-- D5:H28 aralığını seçip yazı rengini OTOMATİK/SİYAH olarak belirleyin.
-- Aynı aralık seçili durumdayken KOŞULLU BİÇİMLENDİRME >> FORMÜL KULLAN seçeneğinde
=$B5=1 formülünü uygulayıp KIRMIZI YAZI RENGİni seçerek işlemi tamamlayın.
 

Ömer BARAN,​

Açıklama için teşekkürler.
Koşullu biçimlendirme yapamıyorum. İlgili alanda hücreye tıklayınca satır ve sütun renklendiren Worksheet_SelectionChange makrosu var.
Bu makro çalışınca yazılan koşullu biçimlendirmeyi siliyor.
 
@ErolU.

Örnek belgenizde böyle bir kod yok sanırım.
Madem belgenizde Worksheet_SelectionChange kodu var, belki de;
koşula bağlı kırmızı renklendirme işlemi, bu kodun içerisine eklenecek birkaç kod satırıyla halledilmeli.

Kodları görmek lazım ama;
şu kodları, mevcut kodun son kısmına eklemek yeterli olabilir (Exit sub durumu varsa bakmak gerek)

VBA:
İçeriği görüntülemek için giriş yapmalısınız
(7 satır)
 
@ErolU.

İsteği ve mevcut kodlarınızın yaptığı işlemin tam olarak anlaşılması için;
mevcut Worksheet_Change kodunun tümünü (başlık ve end sub satırı dahil) geçici olarak PASİF hale getirin veya SİLİN.

Bunun yerine, şu kodu ekleyip denemeler yapın.
KIRMIZI yazı rengi konusunu sanırım tam anlayamadım, A sütunundaki 1'leri elle mi yazıyorsunuz, bir formülün sonucu mudur?

Bir öneri olarak da; tablo dışında olmak üzere her bir renklendirme türü için, birer hücreyi kılavuz olarak kullanabilirsiniz ve
bu kılavuz hücredeki renkleri elle istediğiniz gibi değiştirip, tablonuzdaki renkleri, makro koduna müdahale etmeden
daha esnek olarak belirleyebileceğinizi aklınızda tutun.
Örneğin BA1 hücresini başlık alanlarının olmasını istediğiniz renkle boyarsınız, BA2 hücresini tablo içinin olmasını istediğiniz renkle boyarsınız,
BA3'ü aktif hücrenin satırı ve sütunu için istediğiniz renkle boyarsınız ve makro renkleri bu kılavuz hücrelerden alabilir.

VBA:
İçeriği görüntülemek için giriş yapmalısınız
(18 satır)
 
Çözüm

Ömer BARAN,​

Gönderdiğiniz kodu aşağıdaki kodda çizgi ile gösterdiğim yerin altına eklediğim satırlarla destekleyince istediğim tam oldu.
Teşekkürler, sağ olun.

Son iletinizdeki öneri renklerde sürekli değiştirme yapmayacağım için dosyam gerekli değil.
KIRMIZI yazı rengi konusunu sanırım tam anlayamadım, A sütunundaki 1'leri elle mi yazıyorsunuz, bir formülün sonucu mudur?
Formülle geliyor değer.

Kod:
İçeriği görüntülemek için giriş yapmalısınız
(30 satır)
 
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Konuyu başlatan
Normal Üye
Katılım
Konu Bilgi
Durum
Çözüldü 
Forum
Excel Makro Soruları
Başlangıç tarihi
Son yanıt tarihi
Cevaplar
8
Üst