使用宏将公式插入单元格时出现错误1004

Question

我试图用宏将等式插入单元格。如果我自己复制这个公式，它可以正常工作，但我需要将它复制到每个或四个工作表中的6000个单元格中。这个问题似乎很常见，但通常替代的答案是“;”用“，”不适用。第一行捕获错误1004.

Range("J1").FormulaLocal = "=IF(ISERROR(F1),"",IF(ISTEXT(F1),"",F1))" 
Range("J1:J6000").FillDown 

我也试过使用.formulaLocal，但似乎没有帮助。

Answer 1

您需要用双引号留下一个报价：

Range("J1").FormulaLocal = "=IF(ISERROR(F1),"""",IF(ISTEXT(F1),"""",F1))"