第103回.Unionメソッド
UnionメソッドはApplicationのメソッドで、
| Arg1 | セル範囲 (Range オブジェクト) を指定します。 |
| Arg2 | セル範囲 (Range オブジェクト) を指定します。 |
| Arg3 | セル範囲 (Range オブジェクト) を指定します。 |
| 〜 | |
| Arg30 | セル範囲 (Range オブジェクト) を指定します。 |
Application.は省略可能です。
Dim MyRange As Range
For i = 2 To 10 Step 2
If MyRange Is Nothing Then
Set MyRange = Cells(i, 1)
Else
Set MyRange = Application.Union(MyRange, Cells(i, 1))
End If
Next i
MyRange.Value = "UNION"
２行目から１０行目までの偶数行のA列に、"UNION"と入れています。
Dim i As Long
Dim strRange As String
For i = 2 To 10 Step 2
If strRange = "" Then
strRange = Cells(i, 1).Address
Else
strRange = strRange & "," & Cells(i, 1).Address
End If
Next i
Range(strRange).Value = "UNION"
ただし、Rangeの文字列は、255文字までなので、
細部については、コツ用になった時に調べれば良いでしょう。
しかし、
これを知らないと解決できないような場合もでてきますので、
どのようなメソッドなのかだけは知っておいて下さい。
同じテーマ「マクロVBA入門」の記事
InputBoxメソッド（インプットボックス）
Midステートメント
Intersectメソッド
Unionメソッド
GetPhoneticメソッドとSetPhoneticメソッド（フリガナ）
Callステートメント
Functionプロシージャー
プロシージャーの引数
変数の適用範囲（スコープ,Private,Public）
列挙型（列挙体）Enum
ユーザー定義型（構造体）Type
新着記事NEW ・・・新着記事一覧を見る
Excelワークシート関数一覧（2010以降）｜VBAリファレンス（4月22日）
クラスとCallByNameとポリモーフィズム(多態性)｜VBA技術解説（4月6日）
VBAでのタイマー処理（SetTimer,OnTime）｜VBA技術解説（4月3日）
クラスとイベントとマルチプロセス並列処理｜VBA技術解説（4月2日）
エクセルの日付と時刻のまとめ｜エクセル関数超技（3月6日）
Excelシートの複雑な計算式を解析するVBA｜VBAサンプル集（2月18日）
VBAクラスの作り方：独自Rangeっぽいものを作ってみた｜VBA技術解説（2月16日）
VBAクラスの作り方：列名のプロパティを自動作成する｜VBA技術解説（2月14日）
VBAクラスの作り方：列名の入力支援と列移動対応｜VBA技術解説（2月11日）
クラスを使って他ブックのイベントを補足する｜VBA技術解説（2月6日）
アクセスランキング ・・・ ランキング一覧を見る
1.ひらがな⇔カタカナの変換｜エクセル基本操作
2.最終行の取得（End,Rows.Count）｜VBA入門
3.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
4.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
5.RangeとCellsの使い方｜ExcelマクロVBA入門
6.変数とデータ型（Dim）｜ExcelマクロVBA入門
7.マクロって何？VBAって何？｜ExcelマクロVBA入門
8.繰り返し処理（For Next)｜ExcelマクロVBA入門
9.とにかく書いて見よう（Sub,End Sub）｜VBA入門
10.セルに文字を入れるとは（Range,Value）｜VBA入門
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
なお、掲載のVBAコードは自己責任で使ってください。万一データ破損等の損害が発生しても責任は負いません。