arkadaşlar kolay gelsin bir sorum olacak
formda tarih girdiğimiz zaman kaçıncı hafta olduğuna başka bir metin kutusuna kendiliğinden yazabilirmiyiz. örneğin 10.01.2009 = hafta 2 olabirmi
teşekkürler

=DatePart("ww";[Metin0])
Dim Tarih1 As Date
Dim Mesaj As String
Tarih1 = "01.01.2009"
Tarih2 = "11.01.2009"
Mesaj = DateDiff("ww", Tarih1, Tarih2)
MsgBox Mesaj & "Haftadır."
haftasayisi =DatePart("ww";[Metin0])