Sn. ozanakkaya ilginiz için çok teşekkür ederim lakin fonksiyon yine yanlış hesapliyor. Sizin paylaştığınız dosyada denendiği zaman doğru çalışıyor ancak ikinci izni silip yalnızca ocak ayı içine örneğin 21 günlük izin yazdığım zaman şubat, mart, nisan..... ve snrası aylarda gün sayısını hep eksik gösteriyor.

EDİT:

sn.ozanakkaya fonksiyona şöyle bişey ekledim farklı kombinasyonlarda da denedim sanki oldu gibi. Sizde bakabilir misiniz? Bu şekilde doğru çalışır mı?

    For GTarih = rskayit!Bsl To rskayit!Bts
        If GunS = 0 Then Exit For
        If Trim(Mid(GYilAy, 5, Len(GYilAy))) >= CLng(Format(GTarih, "m")) Then

Merhaba, belirttiğiniz şekilde tablodan satır silip ekleme yaptım. Ancak herhangi bir hesap hatası ile karşılaşmadım. 

Siz tablonun düzenlenmiş halini ekleyin. ZZZZ sorgusunda hangi alanda hangi verinin yazması gerektiğini belirtin. İnceleyip dönüş yapalım.

Yukarıda bahsettiğim ay içine düşen gün sayısının 0 olması durumunda döngü dışına çıkardım şuan sorun yok gibi görünüyor.

(02/01/2018, 21:09)ozanakkaya yazdı: Merhaba, belirttiğiniz şekilde tablodan satır silip ekleme yaptım. Ancak herhangi bir hesap hatası ile karşılaşmadım. 

Siz tablonun düzenlenmiş halini ekleyin. ZZZZ sorgusunda hangi alanda hangi verinin yazması gerektiğini belirtin. İnceleyip dönüş yapalım.

Ozan bey bu fonksiyonla ilgili bir sıkıntım var yardımcı olabilirmisiniz? Mevzuat değişikliği yaşadık. Bende bir türlü halledemedim. Mevcut fonksiyonda 12 gün sayıyordu. 12 günü aşan izin sürelerini ay içindeki günden düşüyordu. Şimdiki düzende bu değişti.

Yeni uygulama:

Personel her ay aldığı yıllık izinlerin 5 güden sonrası sayılacak. 1,2,3,4,5 aldı ise hesaba dahil edilmeyecek. 7 almış ise 2 olarak düşülecek.
Bir sonraki ay veya ilerleyen aylarda 3 daha alırsa hesaba dahil edilmeyecek. 9 alırsa 4 dahil edilecek.
Bir yıl içinde toplamda 12 gün izini 5+5+2 şeklinde kullanma hakkına sahip. durum bu. bu rakamlardan fazla olursa hesaba dahil edip düşeceğiz.

https://accesstr.net/attachment.php?aid=27988