式の設定と取得

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

(Last modified: )

式の設定と取得

セルに数式を設定したり、セルに設定されている数式を取得するには、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 を使ってセルに式を設定する方法およびセルに設定された式を取得する方法を解説しました。

( Written by Tatsuo Ikura )

プロフィール画像

著者 / TATSUO IKURA

これから IT 関連の知識を学ばれる方を対象に、色々な言語でのプログラミング方法や関連する技術、開発環境構築などに関する解説サイトを運営しています。