Merhabalar;
ilişik uygulamada Tablo1 'de
çıkış tarihi
çıkış saati
varış tarihi
varış saati
alanları mevcut
Yapmak istediğim ancak yapamadığım;
1- ( varış tarih / saati ) - ( çıkış tarih / saati ) Ör : 10-03-2023 17:23 - 09-03-2023 05:11 = 36:12
10-03-2023 21:23 - 10-03-2023 17:20 = 4:03
2- Gece saatleri ( 20:00 ila 06:00 arası ) 1. Maddedeki toplam sürenin ne kadarı gece saati içerisinde kalıyor.
Şimdiden teşekkür ediyorum
Merhabalar;
Ben aynı takvim günü içerisindeki zamanı ayırabiliyorken takvim günü değiştiğinde çuvaladım.
Yaklaşık 1 aylık süre zarfında geri dönüş olmadığından yapılması mümkün olmayan yada oldukça uğaştırıcı bir konu olduğu kanaatine varmış bulunmaktayım.
Ben tüm ilgilenenlere teşekkürlerimi sunuyor ve konuyu kapatmanızı rica ediyorum.
Tüm forum üyelerinin Bayramını şimdiden kutlar saygılarımı sunarım.
Dilerim işinize yarar
önce dakika bazında gece gündüz hesabı yapan bir fonksiyon oluşturulur
Function GeceGunduz(Giris As Date, Cikis As Date, xGc As Boolean) As String '?GeceGunduz(cdate("3.01.2023 21:45:00"), cdate("4.01.2023 06:40:00"))
y1 = Int(Giris * 24 * 60)
y2 = Int(Cikis * 24 * 60)
For y = y1 To y2
z = Format(y / (24 * 60), "hh:nn")
If TimeValue(z) >= TimeValue("06:00:00") And TimeValue(z) <= TimeValue("20:00:00") Then xGunduz = xGunduz + 1 Else xGece = xGece + 1
Next y
t = IIf(xGc, xGece, xGunduz)
GeceGunduz = t \ 60 & ":" & t Mod 60
End Function
sonrada oluşturulan sorgu ile veriler çekilir
SELECT Tablo1.CikisTarihi, Tablo1.CikisSaati, Tablo1.VarısTarihi, Tablo1.VarısSaati, GeceGunduz([CikisTarihi]+[CikisSaati],[VarısTarihi]+[VarısSaati],0) AS Gündüz, GeceGunduz([CikisTarihi]+[CikisSaati],[VarısTarihi]+[VarısSaati],-1) AS Gece
FROM Tablo1;
Emeğiniz için çok teşekkürler. İstediğim sonucu alabiliyorum.
Saygılarımı sunuyorum.