if语句在formular1c1和错误1004中

时间:2015-03-28 14:05:31

标签: excel vba excel-vba

我正在尝试使用之前记录的formulaR1C1和= IF() i自动填充范围,但我一直收到1004错误。 我有这个循环在这个特定的sub中运行了几次,并且它适用于其他所有公式,但是使用= 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

任何想法PLIZ?

1 个答案:

答案 0 :(得分:2)

您的公式中存在语法错误,您使用;作为分隔符,但它应该是,。替换这个:

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

用这个:

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

它应该可以正常工作。