arkadaşlar hepinize kolay gelsin...
ekteki örnekte işgünü sayısını hesaplatmam gerekiyor.
bununla ilgili bir function veya kod yazılabilir mi ?
yardımlarınız için teşekkürler...
iki tarih arası işgünü sayısını bulma
Tabii ki yazılabilir.
Remsi bayramları (1 Ocak, 23 Nisan, 19 Mayıs, 30 Ağustos, 29 Ekim) sabit bir günde olduğu için bulmak kolay ancak dini tatiller'de sıkıntı var.
Dini bayram günleri sabit olmadığı ve Access bunları bilemeyeceği için bu günleri ayrı bir tabloya girmeniz gerekir.
Ayrıca verdiğiniz tarihler arası birden fazla tatil olduğu zaman tatil başlangıç ve bitişi ne olacak ?
Remsi bayramları (1 Ocak, 23 Nisan, 19 Mayıs, 30 Ağustos, 29 Ekim) sabit bir günde olduğu için bulmak kolay ancak dini tatiller'de sıkıntı var.
Dini bayram günleri sabit olmadığı ve Access bunları bilemeyeceği için bu günleri ayrı bir tabloya girmeniz gerekir.
Ayrıca verdiğiniz tarihler arası birden fazla tatil olduğu zaman tatil başlangıç ve bitişi ne olacak ?
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Konfüçyüs
Arkadaşlar bu konuda herhangi bir öneriniz yok galiba bunlar accessin yapamayacağı şeyler...
sn onurcan, soru sordunuz.
sn seruz tam olarak ne istediğinizi anlayabilmek için size cevap yazdı.
sizin cevabınız
Öneride bulunabilmemiz için önce soruyu anlamamız gerekiyor, seruz anlayamadıysa kimse anlayamamıştır.
sn seruz tam olarak ne istediğinizi anlayabilmek için size cevap yazdı.
sizin cevabınız
Alıntı:Arkadaşlar bu konuda herhangi bir öneriniz yok galiba bunlar accessin yapamayacağı şeyler...
Öneride bulunabilmemiz için önce soruyu anlamamız gerekiyor, seruz anlayamadıysa kimse anlayamamıştır.
ilk kutuya başlangıç tarihi 2.kutuya bitiş tarihi girilecek bu iki tarih arasında cumartesi pazarı çıkartıp geriye kalan iş günlerini sayısal değer olarak verecek...
bu kadar
bu kadar
Evet doğru yazmışsınız. Ancak bu kadar ... olur.
Alıntı:ilk tarih ile son tarih arasında varsa resmi tatil günlerini ardışık ise tatilin ilk ve son tarihi değilse sadece ilk tarihi girerek hesaplama yaptıracağız. Tatil yoksa alttaki iki kutuya bilgi girmeyeceğiz...
Alıntı:ilk kutuya başlangıç tarihi 2.kutuya bitiş tarihi girilecek bu iki tarih arasında cumartesi pazarı çıkartıp geriye kalan iş günlerini sayısal değer olarak verecek...
bu kadar
Kod:
Private Sub Is_Gunu_Sayisini_Hesapla()
Dim Islem_Tarihi As Date
Me.IsGunuSayisi = 0
If (IsNull(Me.ilktarih) Or IsNull(Me.sontarih)) Or Me.ilktarih > Me.sontarih Then Exit Sub
Islem_Tarihi = Me.ilktarih
While Islem_Tarihi <= Me.sontarih
If Weekday(Islem_Tarihi) <> 1 And Weekday(Islem_Tarihi) <> 7 Then '1=Pazar, 7=Cumartesi
Me.IsGunuSayisi = Me.IsGunuSayisi + 1
End If
Islem_Tarihi = DateAdd("d", 1, Islem_Tarihi)
Wend
End Sub
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Konfüçyüs
Konuyu Okuyanlar: 1 Ziyaretçi