vba中的sumifs公式

如果条件匹配，我想用SUMIFS公式填充一列。

cell.Offset(0, 2).Value = "=SUMIFS(PickData!E:E,PickData!A:A, _ " & cell.Address(Rowabsolute:=False, Column:=False) & ", PickData!C:C, _ "Retail",PickData!C:C, PickData!L:L, "Report1.TextBox1.Value")" 

我无法看到我在哪里找错了查找具体的工作PickData中的零售| C：从TextBox1的价值（这是date）

任何帮助将不胜感激。

谢谢Al

Answer 1

如果你想在单元格中使用公式，那么试试这个。

 cell.Offset(0, 2).Formula = "=SUMIFS(PickData!E:E, PickData!A:A, " _ & cell.Address(0, 0) & ", PickData!C:C, " & Chr(34) & "Retail" & Chr(34) _ & ", PickData!L:L, DATEVALUE(" & Report1.TextBox1.Value & "))" 

这应该给你一个有效的SUMIFS（…）公式。

附录：再看一下，表单的文本框值可能需要用引号括起来。

 cell.Offset(0, 2).Formula = "=SUMIFS(PickData!E:E, PickData!A:A, " _ & cell.Address(0, 0) & ", PickData!C:C, " & Chr(34) & "Retail" & Chr(34) _ & ", PickData!L:L, DATEVALUE(" & Chr(34) & Report1.TextBox1.Value & Chr(34) & "))"