AccessTr.neT

Tam Versiyon: Yılın veya Ayın kaçıncı haftası olduğunu bulmak
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Arkadaşlar Forumda bu aralar aranan konulardan biri ile ilgili olarak bir örnek ekliyorum.
Bu örnekte girilen tarihe göre yılın kaçıncı haftası olduğunu veya yine girilen tarihe göre ayın kaçıncı haftası olduğunu bulabileceğiniz bir örnek.
İki adet örnek bulunmaktadır biri Vba ile diğeri form üzerinde hesaplanarak hazırlanmıştır.

Yılın Kaçıncı Haftası
Kod:
=DatePart("ww";[Tarih])

Ayın Kaçıncı haftası içinde önce ayın ilk gününü buluyoruz

Kod:
=DateSerial(Year([Tarih]);Month([Tarih]);1)

Sonra Ayın İlk günü yılın kaçıncı haftası onu buluyoruz
Kod:
=DatePart("ww";[AyınilkGunu])

Sonra girilen tarihten bulduğumuz yılın hafta sayısından ayın ilk günün haftasayısını çıkartarak 1 ekliyoruz.

Kod:
=DatePart("ww";[Tarih])-(DatePart("ww";[AyınilkGunu]))+1

Bulunan sonuca 1 eklememizin nedeni eğer 01.01.2009 gibi bir tarih girdiğinizde sonucu 0 (Sıfır diye hafta sayısı olmayacağından )olarak göstereceğinden dolayı ekleme yapıyoruz .

Örneklere bakarsanız daha iyi anlaşılacağından eminim
Anlatma becerim biraz zayıftır Img-grin
Sn:Puletin
Paylaşım için teşekkürler.
Sn Puletin Hocam paylaşım için teşekkürler. Saygılar...
Teşekkürler sn Puletin.
Teşekkürler hocam
Sayın Puletin hocam teşekkürler ...