yılın kaçıncı haftasını yazan komut satırına ihtiyacım var

[blazer2004]

iyi çalşmalar arkadaşlar formda aradım bulamadım.ben formumda bulunduğum günü yazdırıyorum yanınada yılın kaçıncı haftası olduğunu yazdırmak istiyorum.herkeze şimdiden teşekkür ederim.

 

[ikskarex]

Merhaba, aşağıdaki kod yılın kaçıncı haftası olduğunu bulur.
Kolay gelsin...

Açıklama : DateDiff fonksiyonu iki tarih arasındaki farkı hesaplar ilk başta verilen parametre d olursa gün w olursa hafta m olursa ay y olursa yıl cinsinden farkı bulur , ikinci ve 3. parametreler aradaki farkı bulunacak tarihler.

Metin1 = DateDiff("w", "1/1/" & Year(Now), Now) + 1

 

[blazer2004]

çok teşekkür ederim sayın ikskarex bir sorum daha olacak ben eğer elle herhangi bir tarihi başka bir metin kutusuna girdiğimde haftayı buldurmam için komut satırında nereyi değiştirmem gerekiyor.tekrar teşekkürler.iyi çalışmalar.


Metin1 = DateDiff("w", "1/1/" & Year(Now), Now) + 1

 

[ikskarex]

cevap

Merhaba
Metin2 kutusuna yazdığınız tarihin o yılın kaçıncı haftası olduğunu Metin1 kutusuna bastırmak için

Metin1 = DateDiff("w", "1/1/" & Year(Metin2), Metin2) + 1

 

[blazer2004]

çok teşekkür ederim sayın ikskarex allah razı olsun.iyi çalışmalar

 

[Veysi Emrah]

bu kod benim de çok işime yaradı, teşekkür etmek istedim.