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

セル範囲を結合・結合を解除（Merge メソッド・UnMerge メソッド）

2015/08/01

Merge メソッド・UnMerge メソッド

セルを結合するには、指定したセル範囲に対して、Merge メソッドを実行します。解除するには、UnMerge メソッドを実行します。

【書式】

m_object.Merge

u_object.UnMerge

引数・戻り値

m_object ・・・結合したいセル範囲（Range オブジェクト）を指定します。
u_object ・・・結合したセル範囲または、その範囲内のセルのうちどれか 1 つのセルを指定します。

セルの結合・結合の解除は、MergeCells プロパティでも可能です。
また、セルが結合セルの一部である場合、その結合セルの範囲を取得するには、MergeArea プロパティを使用します。

Merge メソッド・UnMerge メソッド使用例

サンプルVBAソース

　
Sub Sample_Merge()


    'セル範囲「B1:D5」を結合（※ MergeCells プロパティを使用）
    Range("B1:D5").MergeCells = True


    '結合済みのセルの一部「B2」セルをもとに結合したセル範囲全体を取得する
    '（※ MergeArea プロパティを使用）
    Dim myRng As Range
    Set myRng = Range("B2").MergeArea.Address　　　　'＜ここまで＞


    '結合済のセル範囲 myRng の結合を解除：UnMerge メソッド
    myRng.UnMerge


    'セル範囲「A1:A5」を結合：Merge メソッド
    Range("A1:A5").Merge


End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

　

Sub Sample_Merge()

'セル範囲「B1:D5」を結合（※ MergeCells プロパティを使用）

Range("B1:D5").MergeCells = True

'結合済みのセルの一部「B2」セルをもとに結合したセル範囲全体を取得する

'（※ MergeArea プロパティを使用）

Dim myRng As Range

Set myRng = Range("B2").MergeArea.Address　　　　'＜ここまで＞

'結合済のセル範囲 myRng の結合を解除：UnMerge メソッド

myRng.UnMerge

'セル範囲「A1:A5」を結合：Merge メソッド

Range("A1:A5").Merge

End Sub

　

実行結果

サンプルVBAソース＜ここまで＞実行

最後まで実行した結果

- セルの操作 Merge メソッド, MergeArea プロパティ, MergeCells プロパティ, Range オブジェクト, UnMerge メソッド, VBA基本, エクセルVBA, セルの操作

Tweet

Message コメントをキャンセル

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

関連記事

: 入力規則（リストで制限する）Validation.Add メソッド

ドロップダウンリストで入力値を制限 Validation.Add メソッド（また …

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

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

: 文字列を縮小して全体を表示（ShrinkToFit プロパティ）

ShrinkToFit プロパティ ShrinkToFit プロパティは、セルに …

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

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

: セル幅・高さの既定値（StandardHeight プロパティ・StandardWidth プロパティ）

StandardHeight プロパティ・StandardWidth プロパティ …

: セルの位置を取得（Left プロパティ、Top プロパティ）

Left プロパティ・Top プロパティ Left プロパティは、「A列」の左端 …

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

DirectPrecedents プロパティ DirectPrecedents …

: オートフィルタ（日付による抽出）AutoFilter メソッド

日付で、抽出する（AutoFilter メソッド）【書式】 object.Au …

: 任意のセルを含む行または列全体を参照（EntireRow プロパティ,EntireColumn プロパティ）

EntireRow プロパティ・EntireColumn プロパティ Entir …

: テーマカラーで網かけ（パターン）の色の取得・設定（PatternThemeColor プロパティ・PatternTintAndShade プロパティ）

PatternThemeColor プロパティ・PatternTintAndSh …

PREV: 別シートのセルを選択（Goto メソッド／ PreviousSelections プロパティ）
NEXT: テーマカラーで網かけ（パターン）の色の取得・設定（PatternThemeColor プロパティ・PatternTintAndShade プロパティ）