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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: ハイパーリンク（Hyperlinks オブジェクト）

Hyperlinks オブジェクトワークシートまたはセル範囲のワークシートコレ …

: 連続データを入力する（AutoFill メソッド）

AutoFill メソッド Excel で、連続するデータを入力する「オートフィ …

: 入力規則（エラーメッセージの設定）Validation オブジェクト

無効値を入力時に、エラーメッセージの表示 Validation.ShowErro …

: 対象のセルが直接参照しているセル全てを取得（DirectPrecedents プロパティ）

DirectPrecedents プロパティ DirectPrecedents …

: 対象のセルを直接参照しているセル全てを取得（DirectDependents プロパティ）

DirectDependents プロパティ DirectDependents …

: セルに値を設定する・セルの値を参照する（Value プロパティ）

Value プロパティ Value プロパティは、セルの値を取得したり、値を設定 …

: コメントの設定（Comments, Comment, AddComment, ClearComment）

コメントの設定セルにコメントを新規に挿入するには、AddComment メソッ …

: 指定したセルへ移動（Goto メソッド）

指定したセルへ移動指定したシートの指定したセルへジャンプするには、Goto メ …

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

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

: 対象のセル・セル範囲に数式があるかどうか調べる（HasFormula プロパティ）

HasFormula プロパティ HasFormula プロパティは、対象のセル …

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