式の設定と取得

Excel VBA を使ってセルに式を設定する方法およびセルに設定された式を取得する方法を解説します。

(Last modified: 2023年07月10日)

式の設定と取得

セルに数式を設定したり、セルに設定されている数式を取得するには、Rangeオブジェクトの「Formula」プロパティを使います。

Dim range1 As Range

Set range1 = Range("A4")
range1.Formula = "=Sum(A1:A3)"

またRangeオブジェクトを取り出す部分を省略して次のようにも記述可能です。

Range("A4").Formula = "=Sum(A1:A3)"

注意すべき点としては「Value」プロパティを使う場合には、セルに数式などが設定されていた場合でも、数式ではなく値が取得されます。

サンプルプログラム

では実際に試してみます。

Sub テスト()

    Dim range1 As Range

    Set range1 = Range("A4")
    range1.Formula = "=Sum(A1:A3)"
    
    Cells(4, 2).Formula = "=Sum(B1:B3)"
    
End Sub

実行してみると次のようになります。

今度はセルに設定されているセルを読み出してみます。

Sub テスト()
    
    MsgBox Cells(4, 2).Formula
    
End Sub

実行してみると次のようになります。

このように「Formula」プロパティを使った場合には「値」ではなく「式」が取得されます。

-- --

Excel VBA を使ってセルに式を設定する方法およびセルに設定された式を取得する方法を解説しました。

著者 / TATSUO IKURA

プログラミングや開発環境構築の解説サイトを運営しています。