sql数据源的日期用单引号括起来,而不是#,要改为:
sqlstr += "select 回访日期, 人员 , 情况 from {" & tbs(i) & "} where 回访日期 = '" & d & "'"
参考:
http://www.foxtable.com/help/topics/2343.htm