Excel VBAのResizeプロパティについて
Excel VBAの`Resize`プロパティは、Rangeオブジェクトのサイズを変更するためのプロパティです。これを使用することで、選択範囲の行数や列数を増減させることが可能となります。
Resizeプロパティの基本的な使い方
`Resize`プロパティは以下の形式で使用します:
Rangeオブジェクト.Resize(行数, 列数)
行数と列数はオプションの引数で、省略可能です。引数を省略した場合、元のRangeオブジェクトの行数または列数が使用されます。
例えば、A1セルを基点に行数を3行、列数を2列に変更する場合は以下のように記述します:
Range("A1").Resize(3, 2).Select
このコードは、A1からB3までの範囲を選択します。
Resizeプロパティの活用
以下に、`Resize`プロパティを使用して動的にセル範囲を調整するVBAのサンプルコードを示します。
サンプルコード1: 選択範囲を縦に拡張
Sub ExtendSelectionDown()
Dim rng As Range
Set rng = Selection
rng.Resize(rng.Rows.Count + 3).Select
End Sub
このコードは、現在の選択範囲を下方向に3行拡張します。
サンプルコード2: 選択範囲を横に拡張
Sub ExtendSelectionRight()
Dim rng As Range
Set rng = Selection
rng.Resize(, rng.Columns.Count + 2).Select
End Sub
このコードは、現在の選択範囲を右方向に2列拡張します。