連続するデータの範囲を選択する。

目的

Excel VBA のマクロでデータの入力されている範囲の選択を行いたい。

選択したセルの値、書式を変更したい。

以下のような Excel のワークシートがあるとします。「VBA」の文字が入力されていますが、 6 行目と E 列は空白になっていてデータが連続していません。 Excel の範囲指定で書いてみますと以下の 3 つのエリアに分かれているように見えます。

このワークシートで B3 セルを選択した後に、 Ctrl + * のキーボードショートカットの操作を行うと連続するデータの範囲が選択されると思います。

今回はこの操作と同じことを Excel のマクロで行ってみたいと思います。

Excel VBA のコード例：

Sub 方法_002399()

    ActiveSheet.Range("B3").CurrentRegion.Select 'B3 を基点にしてデータの連続する範囲を選択

End Sub

上のマクロを実行すると以下の画像のようになると思います。このマクロでは CurrentRegion プロパティというものを使用しています。この CurrentRegion プロパティが Ctrl + * のキーボードショートカット操作と同様の働きをしてくれているようです。

ActiveCell（アクティブセル）という書き方もあるようです。

Sub 方法_002399_1()

    ActiveCell.CurrentRegion.Select 'アクティブセルを基点にしてデータの連続する範囲を選択

End Sub

アクティブセルとは以下の画像のような感じだと思います。 A2:D5 が選択範囲になっていますが、アクティブセルは B3 になっています。 A2:D5 を選択後 Tab キーを押していくと以下の画像のような状態を再現できると思います。

間違ってないと良いですが。

以上、閲覧ありがとうございました。

[ Amazon.co.jp アソシエイト ]

[ 楽天市場 ]