Vba 公式1c1内的if语句和错误1004

我试图用公式1c1和我以前记录的

=IF（）

自动填充一个范围，但我一直得到一个1004错误。 我让这个循环在这个特殊的子循环中运行了好几次，它对其他所有公式都很有效，但对于

=IF（）

它不起作用

行

rcell1.FormulaR1C1=“=IF（RC[-1]>0；RC[-1]；0）”

突出显示

Set subgain = Range(Cells(i - period - 1, 16), Cells(i + j, 16))
With subgain
For Each rcell1 In subgain
       rcell1.FormulaR1C1 = "=IF(RC[-1]>0;RC[-1];0)"
Next rcell1
End With

---

你知道普利兹吗

您的公式中有语法错误，您正在使用

作为分隔符，但应改为

，

。替换此项：

rcell1.FormulaR1C1 = "=IF(RC[-1]>0;RC[-1];0)

为此：

rcell1.FormulaR1C1 = "=IF(RC[-1]>0,RC[-1],0)"

它应该很好用