belli bir tarihe gün ekletme?

[alternaty]

Merhabalar,

Ekteki dosyada B4 hücresinin A4 hücresindeki tarihten 90 gün sonrasının tarihini vermesini istiyorum.

Bunu yaparken de ayların 30 ve 31 gün çekmesinin hesaba katılması gerekiyor.
Ben uğraştım ama çözüm bulamadım. Yardım edebilirmisiniz?

Saygılar,teşekkürler...

 

[Merhum İdris SERDAR]

=A4+90

Hücre biçimi genel veya sayı olmuyor mu?

.

 

[alternaty]

Sn. yurttas aslında şunu sormak istiyordum:
e5 hücresi örnekte verdiğim şekilde kalan gün sayısı için belirttiğim renklerde gözüksün. Tabi ben bayağı bir eksik sordum soruyu

 

[Korhan Ayhan]

Selamlar,

Gerçi siz sorunuzu fonksiyonlar bölümüne sormuşsunuz ama ben size kodla çözüm önereceğim. Aşağıdaki kodu boş bir modüle ekleyip dosyanızı kaydedin ve kapatın. Dosyanızı her açışınızda durum sütunu tarihlere göre kontrol edilip yeniden renklendirilecektir.

Sub AUTO_OPEN()
    [E5:E65536].Interior.ColorIndex = xlNone
    For X = 5 To [A65536].End(3).Row
    GÜN = Cells(X, 3) - Date
    If G&#220;N >= 61 And G&#220;N <= 90 Then
    Cells(X, 5).Interior.ColorIndex = 6
    ElseIf G&#220;N >= 31 And G&#220;N <= 60 Then
    Cells(X, 5).Interior.ColorIndex = 44
    ElseIf G&#220;N >= 16 And G&#220;N <= 30 Then
    Cells(X, 5).Interior.ColorIndex = 45
    ElseIf G&#220;N >= 8 And G&#220;N <= 15 Then
    Cells(X, 5).Interior.ColorIndex = 46
    ElseIf G&#220;N < 7 Then
    Cells(X, 5).Interior.ColorIndex = 4
    ElseIf G&#220;N = 0 Then
    Cells(X, 5).Interior.ColorIndex = 3
    End If
    Next
End Sub