Bir sütundaki belli bir kritere ve tarih aralığına göre, farklı bir sütundaki tarihleri renklendirme

[ftoy30]

Merhaba arkadaşlar,

Ekteki tabloda A2 ve E2 hücresindeki isimler birbiri ile aynı ise, F ve G sütununa yazdığım tarihlere eşit ve o tarih aralığında kalan tarihlerin, B sütununda renklenmesini istiyorum. Örneğin ekteki örnekte;
A2 = E2
F2 =01.04.2022
G2=03.04.2022

Buna göre B sütununda 01.04.2022 , 02.04.2022 ve 03.04.2022 tarihleri renklenmeli.
Ben koşullu biçimlendirme ile bir örnek yaptım ancak buradaki sıkıntı F ve G sütununda alt alta tarihler girmeye devam ettiğimde koşullu biçimlendirme işe yaramıyor. Koşullu biçimlendirmeyi F3-G3,F4-G4 ...... olarak devamlı girmem gerekiyor. F ve G sütununa gireceğim tarihlerin 1000 satıra kadar sürebileceğini düşünürsek bunu tek tek yapmak mümkün değil. Bunun için önerebileceğiniz bir seçenek,formül ya da kod var ise yardımcı olursanız sevinirim.

Şimdiden teşekkürler....

 

[YUSUF44]

Şöyle bir farklı çözüm düşünülebilir:

Tarih aralığı girmek yerine, başlangıç tarihi ve gün sayısı girdikten sonra hangi tarihler olduğu makroyla bir tabloya kaydedilir ve koşullu biçimlendirme işlemi bu tablo üzerinden yapılabilir.

 

[ftoy30]

Şöyle bir farklı çözüm düşünülebilir:

Tarih aralığı girmek yerine, başlangıç tarihi ve gün sayısı girdikten sonra hangi tarihler olduğu makroyla bir tabloya kaydedilir ve koşullu biçimlendirme işlemi bu tablo üzerinden yapılabilir.

Maalesef makrolarla ilgili detaylı bilgi sahibi değilim, örnek tabloda ufak bir çalışma ile açıklama şansınız var ise yardımcı olursanız sevinirim.

 

[YUSUF44]

Ekli dosyayı inceleyin. Sayfa olayına bağlı makro ve ad tanımlaması kullandım. F2:G500 aralığında değişiklik yaptığınızda işlem yapar:

 

[ftoy30]

Ekli dosyayı inceleyin. Sayfa olayına bağlı makro ve ad tanımlaması kullandım. F2:G500 aralığında değişiklik yaptığınızda işlem yapar:

çok teşekkür ederim, ellerinize sağlık.

 

[ftoy30]

Ekli dosyayı inceleyin. Sayfa olayına bağlı makro ve ad tanımlaması kullandım. F2:G500 aralığında değişiklik yaptığınızda işlem yapar:

peki bir şey daha sormak istiyorum, A2'deki isim E2 ile eşleşiyorsa bu işlemi uygulamak istiyorum. İncelediğim kadarı ile siz bu şekilde bir kriter koymamışsınız. Buna bu şekilde kriter ekleme imkanı var mıdır?

 

[YUSUF44]

If Intersect satırından sonra aşağıdaki satırı ekleyin:

If [A2] <> [F2] Then Exit Sub

 

[ftoy30]

If Intersect satırından sonra aşağıdaki satırı ekleyin:

If [A2] <> [F2] Then Exit Sub

teşekkürederim.