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

関連記事

: オートフィルタ（平均より上・平均より下）AutoFilter メソッド

平均値よりも大きい（小さい）値のレコードを抽出 AutoFilter メソッドで …

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

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

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

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

: 終端セルを参照する（End プロパティ）

End プロパティ End プロパティは、基準となるセルが含まれる領域の指定した …

: 文字列の横位置を取得・設定する（HorizontalAlignment プロパティ）

HorizontalAlignment プロパティ HorizontalAlig …

: 配列数式を取得または設定する（FormulaArray プロパティ）

FormulaArray プロパティ FormulaArray プロパティは、対 …

: セル範囲内を検索（Find メソッド）

Find メソッド指定したセル範囲内の特定の情報を含むセルを検索します。【書 …

: セルの値を置換（Replace メソッド）

Replace メソッド任意のセル範囲内から特定の値を一括して置換します。Fi …

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

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

: セルの文字列を取得（Text プロパティ）

Text プロパティセルに表示されている文字列を取得します。Text プロパテ …

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