【VBA】複数のセルに対し、1コードで同じ値/同じ数式を設定する

複数のセルに対し、1コードで同じ値を設定する

ここでは例として、シート「sample」の
　・セル「B2～B6」へ
　・値「aiueo」を
設定します。

Sub sample()
    Worksheets("sample").Range("B2:B6") = "aiueo"
End Sub

上記を実行すると、1コードで
　・複数のセル(B2～B6)に
　・同じ値(aiueo)が
設定されたことを確認できます。

複数のセルに対し、1コードで同じ数式を設定する

ここでは例として、
　・セル「B2～B6」へ
　・数式「=ROW(B2)」等を
設定します。

Sub sample()
    Worksheets("sample").Range("B2:B6") = "=ROW(B2)"
End Sub

上記を実行すると、1コードで
　・複数のセル(B2～B6)に
　・数式が
設定されたことを確認できます。

ただ値の時と違い、数式の場合はセル毎に設定される内容は変わります。
以下のようにセル毎に適切な数式が設定されます。