２つ以上のセル範囲を１つにまとめて参照（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 |
実行結果
関連記事
-
-
フリガナの設定（Characters プロパティ,PhoneticCharacters メソッド）
Characters プロパティ Characters プロパティは、文字範囲を …
-
-
セルを削除する（Delete メソッド）
Delete メソッド Delete メソッドで、指定したセル・セル範囲を削除し …
-
-
現在選択されているセルを参照（RangeSelection プロパティ）
RangeSelection プロパティ 実際に何が選択されているかにかかわらず …
-
-
セルが選択されているか確認する（TypeName 関数）
セルが選択されているか確認する方法と使用例 TypeName 関数の引数に、Se …
-
-
フリガナ（Phonetics プロパティ）
Phonetics プロパティ Phonetics コレクションを返します。値の …
-
-
セルの値を置換・書式設定（Replace メソッド,ReplaceFormat プロパティ）
セルの値の置換と書式設定 検索条件に一致するセルの書式を設定するには、まず、Ap …
-
-
引数に指定したセル範囲の共通のセル範囲を取得（Intersect メソッド）
Intersect メソッド Intersect メソッドは、引数に指定したセル …
-
-
セルを挿入する（Insert メソッド）
Insert メソッド Insert メソッドで、指定した場所に新規の空白セルを …
-
-
文字列を縮小して全体を表示（ShrinkToFit プロパティ）
ShrinkToFit プロパティ ShrinkToFit プロパティは、セルに …
-
-
外枠罫線の設定（BorderAround メソッド）
外枠罫線の設定 罫線の設定には、Borders プロパティを使用しますが、範囲内 …