Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

使用中のセル範囲を取得（CurrentRegion プロパティ）

2015/06/30

CurrentRegion プロパティ

CurrentRegion プロパティは、指定したセルを起点とした空白行と空白列で囲まれた最小のセル範囲（アクティブセル領域）を取得します。

【書式】

result = Object.CurrentRegion

引数・戻り値

object ・・・対象となる Range オブジェクト
result ・・・ object で指定したセルを起点とした空白の行列で囲まれたセル範囲（Range 型）

アクティブセル領域とは、Excel での操作で、キーボードの「Ctrl」＋「Shift」＋「*」を押したときに選択される範囲です。

CurrentRegion プロパティの使用例

サンプルVBAソース

　
Sub Sample_CurrentRegion()


    '「A5」セルを起点としたアクティブセル領域を選択
    Range("A5").CurrentRegion.Select
    
    '「A5」セルを起点としたアクティブセル領域のアドレスを表示
    MsgBox Range("A5").CurrentRegion.Address


End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

　

Sub Sample_CurrentRegion()

'「A5」セルを起点としたアクティブセル領域を選択

Range("A5").CurrentRegion.Select

'「A5」セルを起点としたアクティブセル領域のアドレスを表示

MsgBox Range("A5").CurrentRegion.Address

End Sub

　

実行結果

- セルの操作 CurrentRegion プロパティ, Range オブジェクト, VBA基本, エクセルVBA, セルの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: セルのアドレスを確認（Address プロパティ）

Address プロパティ Address プロパティ・AddressLocal …

: 網かけ（パターン）の取得・設定（Pattern プロパティ）

網かけ（パターン）を取得・設定するセルの背景に網かけ（パターン）を設定したり、 …

: セルの値を置換（Replace メソッド）

Replace メソッド任意のセル範囲内から特定の値を一括して置換します。Fi …

: 入力規則（Validation オブジェクト）

Validation オブジェクトセル範囲に入力できる値を制限するには入力規 …

: 任意の行または列を参照（Rows プロパティ,Columns プロパティ）

Rows プロパティ・Columns プロパティ Rows プロパティは、オブジ …

: 引数に指定したセル範囲の共通のセル範囲を取得（Intersect メソッド）

Intersect メソッド Intersect メソッドは、引数に指定したセル …

: セルの高さ・幅を取得（Height プロパティ・Width プロパティ）

Height プロパティ・Width プロパティ Height プロパティは、指 …

: セル内の編集を禁止する（EditDirectlyInCell プロパティ）

EditDirectlyInCell プロパティエクセルでは、セルをダブルクリ …

: セルの値を置換・書式設定（Replace メソッド,ReplaceFormat プロパティ）

セルの値の置換と書式設定検索条件に一致するセルの書式を設定するには、まず、Ap …

: フリガナの設定（SetPhonetic メソッド）

フリガナの設定（SetPhonetic メソッド） SetPhonetic メソ …

PREV: 使用中のセル範囲を取得（UsedRange プロパティ）
NEXT: 引数に指定したセル範囲の共通のセル範囲を取得（Intersect メソッド）