+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: İleri Tarih Belirleme (/konu-ileri-tarih-belirleme.html)
İleri Tarih Belirleme - karaayhan - 05/09/2021
sayın üyeler,
aslangıç tarihi bugün olan bir verinin bitiş tarihi
olarak 1 ay sonrasındaki; ilk p.tesi, çrşb veya cuma gününden hangisine rastlıyorsa
o tarihin bitiş tarihi olarak verilmesini istiyoruz.
şimdiden tsk ederim.
RE: İleri Tarih Belirleme - berduş - 05/09/2021
dateadd fonksiyonunu kullanabilirsiniz
DateAdd("m", 1, Me.baslamatarihi)RE: İleri Tarih Belirleme - karaayhan - 05/09/2021
sayın berduş
mesela bastarihi=05/09/2021 olsun
btiş tar=05/09/2021 (salı) oluyor
oysaki salı ödeme günü değil
ödeme günleri; p.tesi-çarşamba-cuma
dolayısıyla burada bitiş tarihi= 06/09/2021(çarşamba) olmalıydı
bir ay sonrası rastlayan tarih perşembe ise (bitiş tarihi CUMA olmalı)
yok bitiş tarihi bu üç güne rastlarsa aynı gün yazmalı
RE: İleri Tarih Belirleme - berduş - 05/09/2021
aşağıdaki kodu dener misiniz
trh = DateAdd("m", 1, Me.baslamatarihi)
gn = trh Mod 7
ekl = 0
If InStr("0135", gn) > 0 Then If gn < 2 Then ekl = 2 - gn Else ekl = 1
Me.bitistarihi = trh + eklRE: İleri Tarih Belirleme - karaayhan - 05/09/2021
harika elinize sağlık üstad
RE: İleri Tarih Belirleme - berduş - 05/09/2021
Rica ederim
İyi çalışmalar