２つ以上のセル範囲を１つにまとめて参照（Union メソッド）
2015/07/09
Union メソッド
Union メソッドは、２つ以上のセル範囲を１つにまとめて参照します。まとめたセルに名前をつけて扱うことも可能です。
戻り値は、セル範囲を表す Range オブジェクトです。
【書式】
Object.Union ( arg1, arg2 [, arg3, … , arg30 ] )
【項目の説明】
- object ・・・ Application オブジェクト
- arg1,arg2, … arg30 ・・・ セル範囲を表すRange オブジェクトで最大３０まで指定できます。
（ arg1, arg2 は省略不可。arg3 … arg30 は省略可）。
Union メソッドで、まとめることのできるセル範囲は、同一シート上のセル範囲のみです。
Union メソッドの使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
Sub Sample_Union() Dim myUnion 'まとめたセル範囲に名前を付ける Set myUnion = Union(Range("A2:A16"), Range("A3:E8")) '選択 myUnion.Select 'まとめた範囲のセル数を表示 MsgBox Application.Union(Cells(1, 1), Cells(3, 3), Range("c1:F1")).Count End Sub |
実行結果
関連記事
-
-
文字列をセル幅で折り返す（WrapText プロパティ）
WrapText プロパティ WrapText プロパティは、セルに表示されてい …
-
-
次の検索（FindNext メソッド,FindPrevious メソッド）
FindNext メソッド Find メソッドで開始された検索を継続します。引数 …
-
-
任意の行または列を参照（Rows プロパティ,Columns プロパティ）
Rows プロパティ・Columns プロパティ Rows プロパティは、オブジ …
-
-
入力規則（エラーメッセージの設定）Validation オブジェクト
無効値を入力時に、エラーメッセージの表示 Validation.ShowErro …
-
-
セルを挿入する（Insert メソッド）
Insert メソッド Insert メソッドで、指定した場所に新規の空白セルを …
-
-
任意のセルを含む行または列全体を参照（EntireRow プロパティ,EntireColumn プロパティ）
EntireRow プロパティ・EntireColumn プロパティ Entir …
-
-
セルの文字列を取得（Text プロパティ）
Text プロパティ セルに表示されている文字列を取得します。Text プロパテ …
-
-
コメントの設定（Comments, Comment, AddComment, ClearComment）
コメントの設定 セルにコメントを新規に挿入するには、AddComment メソッ …
-
-
非連続のセルが選択されているか確認する（Areas コレクション）
Areas コレクション の使い方 複数の離れた位置にあるセル範囲を選択した場合 …
-
-
書式で検索（Find メソッド,FindFormat プロパティ）
書式で検索 書式を条件にセルを検索する場合、まず、その書式条件を CellFor …