19/01/2010, 13:28
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ı
Ayın Kaçıncı haftası içinde önce ayın ilk gününü buluyoruz
Sonra Ayın İlk günü yılın kaçıncı haftası onu buluyoruz
Sonra girilen tarihten bulduğumuz yılın hafta sayısından ayın ilk günün haftasayısını çıkartarak 1 ekliyoruz.
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
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