Hafta Adedi Hk.

Arkadaşlar merhaba bulunulan aydaki tarihin ayın kaçıncı haftası olduğunu öğrenmek için "weekday" komutuyla denedmi yapamadım. Nasıl yapabilirim?

sayın @serkan1985 

DatePart("ww",[tarih])

kodu ile hafta numarasını öğrenebilirsiniz.

Ozan bey belirttiğiniz kod mevcut haftanın yılın kaçıncı haftası olduğunu gösteriyor. Benim yapmak istediğim örnek eylül ayının 2. haftasında isem sadece "2" 3. haftasında isem "3" olarak tarihi kimlik sayarak sütuna eklemesi.

Aşağıdaki fonksiyon ile ayın kaçıncı haftası olduğunu bulabilirsiniz.

Public Function WeekInMonth(dte As Date) As Integer



Dim strMonthYear As String

Dim dteFirstMonth As Date

Dim intDaysDiff As Integer

Dim intDayFirstOfMonth As Integer



strMonthYear = Month(dte) & "/" & Year(dte)

dteFirstMonth = "01" & "/" & strMonthYear



intDayFirstOfMonth = WeekDay(dteFirstMonth, vbMonday)



intDaysDiff = (dte - dteFirstMonth) + intDayFirstOfMonth - 1



WeekInMonth = Int(intDaysDiff / 7) + 1



End Function

Ozan bey fonksiyonu ekledim ama "DATE(WW)" sütununda nası tarihe göre atıycak tam anlayamadım. Örnek ekte yardımcı olabilirseniz çok sevinirim.

(29/09/2017, 13:54)serkan1985 yazdı: Ozan bey fonksiyonu ekledim ama "DATE(WW)" sütununda nası tarihe göre atıycak tam anlayamadım. Örnek ekte yardımcı olabilirseniz çok sevinirim.

her zaman lazım olabilecek ölçüt ifadeleri inceleyiniz
ofis 2010 kullandığınız için ben açamadım 2007 kullanıyorum