ExcelマクロVBA入門
第38回.セルに計算式を設定（Formula）

.Value
.Formula
.FormulaLocal
.FormulaR1C1
.FormulaR1C1Local
これら全てを覚える必要はありませんが、一応の知識として紹介しておきます。

これは、文字・数値をセルに入れる場合に使用してきました。
同様に、計算式も入れる事が出来ます。
A1セル = B1セル + C1セル
Range("A1").Value = "=B1+C1"
これは、普通に計算式を指定すれば良いです。
関数でも同じです。
A1セル = B1〜B10セルの合計
Range("A1").Value = "=SUM(B1:B10)"

これが解りづらいかもしれません。
計算式をR1C1参照形式で指定します。

セルの相対位置、つまり、計算式を設定しようとしているセルからの移動量を、
行位置をRに続けて記述し、列位置をCに続けて記述します。
R ・・・ Rの後に何も記述しない場合は同一行
C ・・・ Cの後に何も記述しない場合は同一列
R1 ・・・ Rの後に数値のみ記述した場合はその絶対行数
C1 ・・・ Cの後に数値のみ記述した場合はその絶対列数
R[1]・・・ Rに続けて[数値]とした場合は、数値行数分、行位置をづらした行
C[1]・・・ Cに続けて[数値]とした場合は、数値列数分、列位置をづらした列
これらを組み合わせて、計算式を設定するセルからの位置を指定します。
例．C5セルに計算式を設定する場合

RC1 ・・・ A5セル
R1C ・・・ C1セル
R[1]C[2] ・・・ E6セル
RC[-1] ・・・ B5セル
このようになります。

と付くものは、PC環境に依存する設定を有効にする場合です。
書式の設定では、
NumberformatLocalを使いましたが、それと同じような事です。
書式では、マシンに依存する表示を使う事が多いので、Localを使う事を勧めました。
しかし、計算式ではそんなに多くはないですが、あるにはあります。
例えば、JIS関数を設定するなら、Localを使わないとエラーとなります。

Range("A1").Value = "=B1+C1"
Range("A2").Formula = "=B1+C1"
Range("A3").FormulaR1C1 = "=B1+C1"
Range("A4").Value = "=RC[1]"
Range("A5").Formula = "=RC[1]"
Range("A6").FormulaR1C1 = "=RC[1]"
上記では、A3セルのみ正しく設定されません。
R1C1の場合は、R1C1参照形式で設定する必要がある訳ですが、まあ当然ですね。
それなら、結果として、.Valueだけで良い事になります。
結論からすれば、そういう事なのですが、
マクロを書くときには、可読性を考慮しますので、
R1C1参照形式で設定する場合は、R1C1を使うようにします。

多くのプロパティが存在して、
そして、このブログでも何故紹介したのかと言うと、
それは、設定する時ではなく、その設定された計算式を参照する時に使うからです。
以下の設定をした場合、
Range("A1").Value = "=B1+C1"

設定後に、そのプロパティを参照すると、
Range("A1").Value ・・・ 計算結果の値
Range("A1").Formula ・・・ =B1+C1
Range("A1").FormulaR1C1 ・・・ =RC[1]
のように、参照結果が違ってきます。
つまり、計算式を設定する場合は、
.Value
で良いが、
計算式を参照する場合は、
.Formula
または、
.FormulaR1C1
を使うと言う事になります。
R1C1を使うメリット

R1C1参照形式は、少し面倒に感じるかもしれませんが、
以下のような場合には、有効な指定方法になります。

Sub サンプル1() 　　Dim i As Long 　　For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row 　　　　Cells(i, 2).FormulaR1C1 = "=RC[-1]*100" 　　Next i End Sub

R1C1参照形式は、設定するセルからの、相対参照・絶対参照の組み合わせになっていますので、
設定するセルが、どのセルであろうと、同一の計算式を設定する事が出来ます。

Sub サンプル2() 　　Range(Range("B1"), Cells(Rows.Count, 1).End(xlUp).Offset(0, 1)).Value = "=A1*100" End Sub

このように、１行でも書く事が出来るようになります。
（Offsetについては、後々説明します。）
この「マクロ超入門」を最期まで読み進めれば、これをすんなり書けるようになります、
ただし、少し真面目に勉強すればですけどね（笑）

同じテーマの記事
新着記事