Home » Excel VBA Rangeオブジェクト » Offsetプロパティ » 見出し行以外を選択する−Offset・Resizeプロパティ

見出し行以外を選択する−Offset・Resizeプロパティ

対象：Excel97, Excel2000, Excel2002, Excel2003

複数のワークシートを1枚のシートにまとめる処理をコーディングする場合、1枚目のシートのデータをコピーする際は「Range("A1").CurrentRegion.Select」で問題ありませんが、2枚目以降のシートでは見出し行が余分ですから、見出し行を除いたリスト範囲を選択する必要が出てきます。

［スポンサードリンク］

選択範囲をずらして選択するOffsetプロパティと、選択範囲のサイズを変更するResizeプロパティを利用すると、見出し行を除いた範囲を選択することができます。

▼A1セルから始まる表の見出し行を除いて選択するコード
Range("A1").CurrentRegion.Select
Selection.Offset(1, 0).Select
Selection.Resize(Selection.Rows.Count - 1).Select

1行目の、

Range("A1").CurrentRegion.Select

で、A1セルのアクティブセル領域を選択しておいて、
2行目の

Selection.Offset(1, 0).Select

で、選択範囲を1行下にずらして、
3行目の、

Selection.Resize(Selection.Rows.Count - 1).Select

で、選択範囲を1行減らしています。

ワークシートを見ながらステップ実行していただくと、何をしているのかよくわかるはずです。

Resizeプロパティの引数の「Selection.Rows.Count - 1」は、「Selection.Rows.Count」で選択範囲の1行目の見出し行を含む行数を取得して、そこから1行目を除くために「1」を減算することを表しています。

［スポンサードリンク］

Home » Excel VBA Rangeオブジェクト » Offsetプロパティ » 見出し行以外を選択する−Offset・Resizeプロパティ

『インストラクターのネタ帳』では、2003年10月から平日のほぼ毎日、Microsoft Officeの使い方などを紹介し続けています。
Excel VBAユーザーを対象とした、Word VBAの入門書をキンドル本として出しました↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の元になったキンドル本です↓↓

3年前(2021年4月)の
人気記事

「Offsetプロパティ」の記事一覧