içinde bulundugu haftanını ilk gününün tarihini

[mehmet2285]

mrhb ustadlarım bir sorum olacak, içinde bulundugu haftanını ilk gününün tarihini veren bir fonksiyon olabilirmiyi yardımcı olursanız sevinirim ...

 

[mehmet2285]

örnek olarak bu haftanın ilk günü (pazartesi ) 29.12.2008 tarihi

 

[ozgretmen]

Aşağıdaki şekilde dener misiniz ?

A1 Hücresine:

=BUGÜN()

A2 Hücresine:

=A1-HAFTANINGÜNÜ(A1;3)

 

[Necdet]

Merhaba,

=BUGÜN()-HAFTANINGÜNÜ(BUGÜN();2)+1
=TODAY()-WEEKDAY(TODAY();2)+1

 

[Orion1]

örnek olarak bu haftanın ilk günü (pazartesi ) 29.12.2008 tarihi

Size bir ktf hazırladım kullanılışı.
=hafta_Basi()

Function hafta_basi()
Dim tarih As Date
If Weekday(Date, 2) = 1 Then
    hafta_basi = Date
    Else
    For tarih = Date To 7 Step -1
        If Weekday(tarih, 2) = 1 Then hafta_basi = tarih: Exit For
    Next
End If
End Function

 

[Orion1]

Necdet hocam ve özgöretmen yerleşik fonksiyonlarla hemen cevabı vermiş bile .Ben ise sıkıştığımda hemen bir KTF yapıveriyom.

 

[mehmet2285]

hepinize çok tşk ediyorum ustadlar hepsi de işime yarıyor ) kolay helsin allah yardımcınız olsum herdaim..

 

[Ali]

Hafta'lar ile ilgili başka örnekler içinde güncellemiş dosyayı aşağıdaki linkte bulabilirsiniz.

Tarih & Zaman & Saat Fonksiyonları Uygulamaları

.