Koşullu biçimlendirme hk.

[Garuramon]

Değerli Arkadaşlarım Merhaba,

EK' li olan dosyada F sütununa tarih girdikten sonra 15 gün içinde G sütununa tarih girilmez ise 10. gün dahil 15 güne kadar J3:O3 satırları arasındaki dolgu renklerinin G sütunundaki Çıkış Tarihi yazan hücrenin altını renklendirmesine ihtiyacım var. ilave olarak Çıkış tarihi yerine tarih yazdığım zaman renkli dolgu yapmaması gerekiyor. Dosyada bir kaç örnekleme yaptım.

İhtiyaç duyduğum konuyu aslında şu;
işe giriş tarihi sütununa tarih yazdıktan sonra 15 gün içinde çıkış işlemi yapılması ve bunu benim takip ediyor olmam gerekiyor.

 

[TanerSaydam]

Bunu excel sayfasının Open özelliği ile yapabilirsiniz. Open'a tarih sorgulatırsınız ve eğer +10 günden sonra boşsa dediğiniz sütunları boyar. Eğer tarih girilirse de bir sonraki açılışınız da ya da change özelliğine gireceğiniz bir komutla siler. Dediğimi anlamadıysanız excel dosyasını indirebileceğim bir yere yüklerseniz, örnek olarak düzenleyip atarım.

 

[çıtır]

Sayfa1 F ve G sütunuda işlem yaptığınızda koşullara göre renklendirir.
Sayfa kodu

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Intersect(Target, [F:G]) Is Nothing Then Exit Sub
On Error GoTo Çıkış
sonsat = Range("F65500").End(3).Row
For i = 4 To sonsat
If Range("F" & i) <> "" And Range("G" & i) = "" Then
t = Date - Range("F" & i)
If t = 10 Then
Range("G" & i).Interior.Color = Range("J3").Interior.Color
End If
If t = 11 Then
Range("G" & i).Interior.Color = Range("K3").Interior.Color
End If
If t = 12 Then
Range("G" & i).Interior.Color = Range("L3").Interior.Color
End If
If t = 13 Then
Range("G" & i).Interior.Color = Range("M3").Interior.Color
End If
If t = 14 Then
Range("G" & i).Interior.Color = Range("N3").Interior.Color
End If
If t >= 15 Then
Range("G" & i).Interior.Color = Range("O3").Interior.Color
End If
Else
Range("G" & i).Interior.Color = xlNone
End If
next i
Çıkış:
end sub

 

[ASLAN7410]

Sayın çıtır, kodlar gayet güzel çalışıyor, elinize sağlık.

Bu işlem koşullu biçimlendirmede formülle nasıl yapılır? Bir türlü çözemedim.

 

[çıtır]

Sayın çıtır, kodlar gayet güzel çalışıyor, elinize sağlık.

Bu işlem koşullu biçimlendirmede formülle nasıl yapılır? Bir türlü çözemedim.

Sayın ASLAN7410
Teşekkür ederim.Koşullu biçimlendirmede gün şartı belirlensede Diğer hücredeki renkler tanıtılamadığından yapılamaz diye düşünüyorum.Diğer hücrelerden bağamsız renk oluşturulur ise olur.

 

[ASLAN7410]

Sayın çıtır, J ve O sütunundaki renklere bağlı kalmadan, koşullu biçimlendirmedeki biçimlendirme kısmındaki renkler seçilerek yapılamaz mı?

 

[çıtır]

Sayın ASLAN7410
Yapılabileçeğini bir önçeki mesajımda belirtmiştim.Günün tarihine göre formül belirlenerek yapılabilir.
Formül

=VE($F4<>"";$G4="";BUGÜN()-$F4=10)

1.renk
Diğer şartlar ve renkle sondaki 10 değiştirilir

 

[ASLAN7410]

Bu mesaj silindi.

 

[ASLAN7410]

Sayın çıtır, rahatsız ediyorum, ancak sizin formülü soruyu soran arkadaşın örneğine ekleyerek gönderiyorum, formülü çalıştıramadım.

 

[çıtır]

Sayın ASLAN7410
Kusura bakmayın geç oldu. Formülde sabitleme ve parantez hatası yapmışım.Dosya ekledim ve formülü düzeltiyorum.

=VE($F4<>"";$G4="";BUGÜN()-$F4=10)

 

[ASLAN7410]

Sayın çıtır, çok teşekkür ediyorum, hayırlı geceler.

 

[çıtır]

Sayın çıtır, çok teşekkür ediyorum, hayırlı geceler.

Hayırlı geçeler Sayın ASLAN7410

 

[Garuramon]

Emeği gecen tüm arkadaşlara çok teşekkür ederim.Sorun çözümlenmiştir.

 

[Garuramon]

Bunu excel sayfasının Open özelliği ile yapabilirsiniz. Open'a tarih sorgulatırsınız ve eğer +10 günden sonra boşsa dediğiniz sütunları boyar. Eğer tarih girilirse de bir sonraki açılışınız da ya da change özelliğine gireceğiniz bir komutla siler. Dediğimi anlamadıysanız excel dosyasını indirebileceğim bir yere yüklerseniz, örnek olarak düzenleyip atarım.

Taner Bey,

Sizin yazmış olduğunuz çözümü de merak ediyorum.

Dosya linki http://dosya.co/ftmt3i7kd1sr/liste.xlsm.html