vb.net - How to loop through the weeks in a date range with vba -
i have seen how loop through weeks of year, w1301,w1302,w1303, can week number if loop through + on week number believe there way directly loop weekly vba, hope @ least.
dateserial(year(now), month(now), day(now)) dateserial(2013, 3, 1) startdate = #1/1/2013# enddate = #12/31/2013# datelooper = startdate enddate
i got function week number date
public function isoweeknumber(d1 date) integer attributed daniel maher dim d2 long d2 = dateserial(year(d1 - weekday(d1 - 1) + 4), 1, 3) isoweeknumber = int((d1 - d2 + weekday(d2) + 5) / 7) end function
you use dateadd function
for = 1 52 debug.print dateadd("ww", i, now()) next
Comments
Post a Comment