マクロを使用してセルに式を挿入するときのエラー1004

Question

セルに式を挿入するためにマクロを使用しようとしています。私が自分でそれをコピーすると、方程式は正常に動作しますが、それを各ワークシートまたは4つのワークシートの6000個のセルにコピーする必要があります。この質問はかなり一般的ですが、 ";" "、"は適用されません。最初の行はエラー1004をキャッチします。

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

私も.formulaLocalを使ってみましたが、それは役に立たないようです。

Answer 1

あなたは1クオート残すように二重引用符を使用する必要があります。

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