Dim filter="销售日期<=#"& vars("enddate") &"# And 销售日期>=#"& vars("startdate") &"#"Dim filter1="[型号] = '" & lst2(r) & "' And [销售员] = '" & lst(r2) & "' And " & filter & " And [毛利] >= " & Vars("deduct1")
加好友 
发短信
Post By：2017/11/2 19:23:00 [只看该作者]
