工作表中的SUMIF方程式与VBA不兼容

我有一列的销售额列表,然后是附近的另一列,显示销售额是“YOR”还是退货的是“RE”,我想总结YOR的美元数字。

我有一个公式,我试图插入到一个工作表使用macros。 当你运行这个macros时,H16中有一个单元格应该填写总销售数字

有一个名为CellNumber(Long)的variables,它包含列表中的项目数量。 VA05NDump是包含数据的工作表的名称。

Range("H16").FormulaR1C1 = "SUMIF((VA05NDump!R2C3:VA05NDump!R"&CellNumber&"C3),"YOR",R2C13:R"&CellNumber&"C13) 

当我点击VBA中的公式时,它会显示“预计编译错误:语句结束”,并强调括号内的内容:[“C3”,“]

我试过将“YOR”改为=“YOR”和“= YOR”,但是这不会改变任何东西。

任何帮助都是极好的!

谢谢!

尝试这个:

 Range("H16").FormulaR1C1 = "=SUMIF((VA05NDump!R2C3:VA05NDump!R" & CellNumber & _ "C3),""YOR"",R2C13:R" & CellNumber & "C13)" 

修订:
1.增加=预先login。
2.在这部分中双引号为: "C3),""YOR"",R2C13:R" 。 请阅读本文 ,讨论如何将适用于所有string的双引号放在工作表公式中。
3.添加了缺失的"最后。

你错过了一个结尾" ,最后可能是你的公式开头。

这是我以前在公式中input一个单元格的方法。 这是通过将公式作为stringinput到单元格中完成的。

 'Make Formula into a string Dim Formula As String Formula = "=SUMIF((VA05NDump!R2C3:VA05NDump!R" & CellNumber & _ "C3)," & chr(34) & "YOR" & chr(34) & ",R2C13:R" & CellNumber & "C13)" 'Activate the desired range Range("H16").Activate 'Enter formula string into active cell ActiveCell = Formula 

另外“Chr(34)”可以用作“。我发现这有助于创build一个string,其中chr(34)&”YOR“&chr(34)=”“YOR”“,所以当它进入单元格时成为“YOR”