※【Excel VBA】サンプルファイル(.xlsm)《ダウンロード》
- 特定のセルを含む表の範囲から見出し行を除いたセル範囲を、Rangeオブジェクトとして取得しましょう。
- まず B4 セルを基準としたCurrentRegion プロパティで取得した表の範囲を選択します。
- 次に、その選択範囲をOffsetプロパティで1行下にずらして再選択します。
- さらに、Resizeプロパティで対象範囲を1行分減らして再選択します。
目次
【Excel VBA】サンプルコード
サンプルコード
Sub vba137()
Range("B4").CurrentRegion.Select
Selection.Offset(RowOffset:=1).Select
Selection.Resize(RowSize:=Selection.Rows.Count - 1).Select
End Sub
解説
- 特定のセルを含む表の範囲から見出し行を除いたセル範囲を、Rangeオブジェクトとして取得しましょう。
- まず B4 セルを基準としたCurrentRegion プロパティで取得した表の範囲を選択します。
- 次に、その選択範囲をOffsetプロパティで1行下にずらして再選択します。
- さらに、Resizeプロパティで対象範囲を1行分減らして再選択します。
【Excel VBA】実行例
ステップ 1 ・・ 次 へ

ステップ 2 ・・ 戻 る 次 へ

コメント