工作表中的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”