• DİKKAT

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

Koşullu biçimlendirme ile kayıt takibi

ATEMİ

Altın Üye
Katılım
9 Ocak 2006
Mesajlar
462
Excel Vers. ve Dili
Office 2021 Türkçe
Merhaba;
Koşullu biçimlendirme kullanarak bir tablo içindeki bir sütunda bulunan "X" baz alınarak diğer sütunda bulunan kayıt tarihi üzerinden 10 gün geçtiğinde ilgili kayıt satırı kırmızı olacak.
Bu kırmızının kalkması ancak "X" ile ilgili yeni kayıt girilmesi ile olabilecek tabi "X" burda da olacağı için 10 gün sayacı bu satırda da devam ederek gidecek
Ben de bu çalışmayı "Y" "Z" vs devam ettireceğim.
Teşekkür ederim.
 

Ekli dosyalar

Arkadaşlar aynı tablo üzerinde başka bir koşullu biçimlendirme daha yapmam gerekiyor;
Şöyle ki,
Takip kodu sütununda bulunan "X" kaç tane olursa olsun bunlara denk düşen kayıt tarihinde en büyük tarihi baz alınarak bu tarih üzerinden 30 gün geçmesi durumunda turuncu yapmak istiyorum. Yardımcı olursanız sevinirim.
 
Arkadaşlar çözemedim bunu bir yerlerde bir hata yapıyorum galiba ama eminim çok basit bir iştir.
 
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [B8:R10645]) Is Nothing Then Cells(Target.Row, "T") = Format(Now, "dd mmmm yyyy hh:mm")
End Sub

Bu koddaki tarihin iki tırnak arası olması nedeniyle metin olarak algılıyor sorun bundan olabilir mi acaba?
 
Önce hücreye tarihi yazdırın. Sonrasında biçimlendirme işlemi yapmayı deneyiniz.
 
Korhan Bey Merhaba,
Öncelikle bir çok soruma cevap veren kişi olarak yine sizin müdahale etmeniz beni çok mutlu etti.
Boş bir hücreye bu tarihi formülle çekiyorum ama burada metin olarak geldiği için sanırım istediğimi vermiyor
Örneğin gelen tarihe 1 gün ekle dediğimde hata veriyor
Kodun içinde tırnak içerisinde dışında yapılamaz mı
 
Bir önceki mesajımda bahsettiğim işlem buydu zaten..

Önce elle tarihi yazdığınız sütuna normal hücre biçimlendirmeden "gg aaaa yyyy ss:dd" uygulayınız.

Sonrasında makro kodundaki hücreye tarih yazdıran bölümü aşağıdaki gibi düzenleyiniz.

Cells(Target.Row, "T") = Now
 
Koray bey aynen yaptım çalışıyor teşekkür ederim.
Peki koşullu biçimlendirme konusunda nasıl yapmam gerekir
 
Üstadım elinize sağlık ama
X ile ilgili süre dolduğunda kırmızı vermesine kadar problem yok bu kırmızının x ile ilgili yeni kayıt girildiğinde normale dönmesi gerekiyor
ta ki bu son kayıt üzerinden 10 geçene kadar
 
O zaman kurguda bir hata yaptım demektir.. Bir daha kontrol edeyim..
 
Her takip kodu için bir takip süresi olacak bu süre dolduğunda o numaralı kayıt kırmızı olacak
bu uyarı ile kişi aynı kodla yeni bir numara ile kayıt açtığında ilgilendiği anlaşılacak ve önceki kayıttaki kırmızı uyarı biçimi kalkacak ve bu yeni kayıt numarasıyla süre dolana kadar normal devam edecek süre dolunca da bu yeni kayıt için uyarı biçimi gelecek
 
#9 nolu mesajımda ki dosyayı güncelledim. Tekrar kontrol edersiniz.
 
Korhan bey 1 tık kalmış
yeni kayıt girildiğinde önceki kayıtlardaki biçimin kalkması gerekiyor
X kodu ile en son kayıtta süre geçtiyse kırmızı olacak yeni kayıt girildiğinde ordan devam edecek
Yani X ile ilgili süresi geçtiğinde bir tek satır kırmızı olacak
 
Örnek dosya üzerinde tarif ederseniz sevinirim..
 
Korhan Bey emeğinize sağlık çok güzel olmuş sizi uğraştırdım hakkınızı helal edin
 
Korhan bey takip kodunda "x" yerine önceden belli olmayan ibareler gelecek değiştiririm dedim ama yapamadım bakarsanız sevinirim
VE($C2="x";BUGÜN()-$B2>10;EĞERSAY($C3:$C$1048576;$C2)=0)
 

Ekli dosyalar

Böyle deneyebilirsiniz..

Boş olmayan hücreler için çalışacaktır..

VE($C2<>"";........
 
Geri
Üst