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

Question

我尝试使用宏将等式插入单元格。如果我自己复制它，方程式工作正常，但我需要将它复制到每个或四个工作表中的6000个单元格。这个问题似乎很常见，但通常的答案是替换＆＃34;;＆＃34;用＆＃34;，＆＃34;不适用。第一行捕获错误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))"