+- 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ığı: Tarih (/konu-tarih.html)
Tarih - metınaycıcek - 23/11/2022
Sayın Hocalarım herkese hayırlı günler.
göndermiş olduğum vt 'de işe başlama tarihi bir türlü yapamadım. sıkıntım izin bitiş tarihi hafta sonuna geldiğinde işe başlama tarihi pazartesi tarihini ,izin bitiş tarihi hafta içi'ne geldiğinde işe başlama tarihi bir gün sonrasını yazmasını sağlam,
şimdiden Allah cc razı olsun.
Sayın Hocalarım yanlış yere açmışım konuyu özür dilerim
Tarih - metınaycıcek - 24/11/2022
Sayın Hocalarım vt yanlış yerde açtığım için özür dilerim.
göndermiş olduğum vt 'de işe başlama tarihi bir türlü yapamadım. sıkıntım izin bitiş tarihi hafta sonuna gelirse işe başlama tarihi pazartesi tarihini ,izin bitiş tarihi hafta içi'ne gelirse işe başlama tarihi bir gün sonrasını yazmasını sağlamak,
şimdiden Allah cc razı olsun.
vt yanlış yerde açtığım için Tekrardan özür dilerim.
RE: Tarih - atoykan - 24/11/2022
İzin bitiş tarihinizin güncelleştirme sonrasına
If Weekday(btstrh) = vbFriday Then
Me.ısbtstrh = btstrh + 3
ElseIf Weekday(btstrh) = vbSaturday Then
Me.ısbtstrh = btstrh + 2
ElseIf Weekday(btstrh) = vbSunday Then
Me.ısbtstrh = btstrh + 1
Else
Me.ısbtstrh = btstrh + 1
End IfRE: Tarih - berduş - 24/11/2022
Alternatif olarak aşağıdakine benzer bir kod da kullanılabilir
Daha önce başka bir çalışmada kullanmıştım
Gün yerine 1 yazılmalı
Tarih + Gün+ IIf((Tarih + Gün) Mod 7 < 2, 2 - (Tarih + Gün) Mod 7, 0) RE: Tarih - metınaycıcek - 25/11/2022
Sayın berduş Hocam Allah cc razı olsun
geç cevap verdiğim içinde ayrıca özür dilerim
RE: Tarih - metınaycıcek - 25/11/2022
Sayın atoykan Hocam Allah cc razı olsun
geç gördüğüm ve geç cevap verdiğim için çok özürdilerim