如
t1.Filter = "年份 = '" & vars("year") & "'And sys_weekofyear = " & DatePart("ww",Date.Today.AddDays(- 7))
改成
t1.Filter = "学习科目 is not null and 年份 = '" & vars("year") & "'And sys_weekofyear = " & DatePart("ww",Date.Today.AddDays(- 7))
加好友 
发短信
Post By：2015/9/4 14:55:00 [显示全部帖子]
