VBA　セルに数式を入力・取得

セルに数式を入力する

Valueプロパティによる設定

Sub test1()

Range("G3").Value = "=SUM(B3:F3)"

　’ もしくはValueを省略しても良い

　　Range("G3") = "=SUM(B3:F3)"

End Sub

通常ワークシートと同じく、数式をプロパティに代入する。

Formulaプロパティによる設定

Sub test2()

Range("G3").Formula= "=SUM(B3:F3)"

End Sub

本来、セルに数式を代入するには、Formulaに代入することとなりますが、test1のようにValueに代入した場合でも、Excelが代入する内容を自分で判断して、勝手にFormulaへ変えてくれたようです。

実行結果

セルに数式を取得する

Sub test3()

MsgBox Range("G3").Value & vbCrLf & _
Range("G3").Formula

End Sub

実行結果