VBAを使用してセルに式を挿入する - 動作しません。

マクロに式を挿入しようとしていますが、マクロを実行すると数式に固執します。これは私が使用しているフォーマットです：VBAを使用してセルに式を挿入する - 動作しません。

ThisWorkbook.Sheets("Sheet1").Range("B5").Formula = "=IF(ISERROR(ROUND(AVERAGE(D16:D75),3)), "", ROUND(AVERAGE(D16:D75), 3))"

2017-01-06 R S

'' ''を '' "" "" 'に変更してください –

@ScottCraner恐縮です - ありがとうございます！どのように私はあなたに親指を与えるのですか？ –

また、IFERROR（）で短縮することもできます： '" = IFERROR（ROUND（AVERAGE（D16：D75）、3）、 "" ""） "' –

問題は引用符で囲まれているため、文字列が混乱しています。 CHRでそれらを交換してみてください（34）

ThisWorkbook.Sheets("Sheet1").Range("B5").Value = "=IF(ISERROR(ROUND(AVERAGE(D16:D75),3))," & CHR(34) & CHR(34) & ", ROUND(AVERAGE(D16:D75), 3))"

結局、あなたは（「」「」）引用符を二倍使用することができますが、私は読み非常に困難ことがわかります。

2017-01-06 19:58:45 Eleshar

答えて