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

セル範囲を結合・結合を解除（MergeCells プロパティ）

2015/06/24

MergeCells プロパティ

MergeCells プロパティは、指定したセル範囲を結合するかどうかを取得・設定します。設定する場合は、True（結合）または、False（結合を解除）を指定します。

【書式】

＜取得＞
result = Object.MergeCells

＜設定＞
Object.MergeCells = variant

引数・戻り値

object ・・・対象となる Range オブジェクト
variant ・・・セルを結合する場合は、True、結合を解除する場合は、False を指定します。
result ・・・指定したセル範囲が、結合したセルの一部であるかどうかのバリアント型の値（内部処理形式 Boolean）。
True：指定したセル範囲が結合したセル、またはその一部である場合、あるいは複数の結合したセル範囲である場合。
False：指定したセル範囲が結合されていない場合。
Null 値：指定したセル範囲が、結合したセルとそうでないセルの両方が含まれている場合。

MergeCells プロパティの使用例

サンプルVBAソース

　
Sub Sample_MergeCells()

    'セル範囲「B4：B9」を結合
    Range("B4:B9").MergeCells = True
    
    
    'セル範囲が、結合されているかどうかを確認
    
    'セル範囲「B4:B9」⇒ 結合されている「Treu」
    Debug.Print Range("B4:B9").MergeCells
    
    'セル範囲「A5」⇒　通常のセル「False」
    Debug.Print Range("A5").MergeCells
    
    'セル範囲「B4:B12」⇒ 複数の結合されたセル範囲にまたがっている「Treu」
    Debug.Print Range("B4:B12").MergeCells
    
    'セル範囲「A4:B9」⇒ 結合されたセルと通常のセル「Null 値」
    Debug.Print Range("A4:B9").MergeCells
    
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_MergeCells()

'セル範囲「B4：B9」を結合

Range("B4:B9").MergeCells = True

'セル範囲が、結合されているかどうかを確認

'セル範囲「B4:B9」⇒ 結合されている「Treu」

Debug.Print Range("B4:B9").MergeCells

'セル範囲「A5」⇒　通常のセル「False」

Debug.Print Range("A5").MergeCells

'セル範囲「B4:B12」⇒ 複数の結合されたセル範囲にまたがっている「Treu」

Debug.Print Range("B4:B12").MergeCells

'セル範囲「A4:B9」⇒ 結合されたセルと通常のセル「Null 値」

Debug.Print Range("A4:B9").MergeCells

End Sub

　

実行結果

サンプルVBAソース実行前

実行後

- セルの操作 MergeCells プロパティ, Range オブジェクト, VBA基本, エクセルVBA, セルの操作, セルの結合

Tweet

Message コメントをキャンセル

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

関連記事

: 対象のセルが配列数式の一部かどうか（HasArray プロパティ）

HasArray プロパティ HasArray プロパティは、対象のセルが配列数 …

: 入力規則（日本語入力）Validation オブジェクト,IMEMode プロパティ

IMEMode プロパティ Validation.IMEMode プロパティを …

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

PatternThemeColor プロパティ・PatternTintAndSh …

: 引数に指定したセル範囲の共通のセル範囲を取得（Intersect メソッド）

Intersect メソッド Intersect メソッドは、引数に指定したセル …

: セル・セル範囲を貼り付ける（Paste メソッド）

Paste メソッド Paste メソッドは、クリップボードの内容を指定したセル …

: ハイパーリンク（Hyperlink オブジェクトのメソッド）

Hyperlink オブジェクトのメソッド Hyperlinks コレクション …

: 対象のセル・セル範囲に数式があるかどうか調べる（HasFormula プロパティ）

HasFormula プロパティ HasFormula プロパティは、対象のセル …

: オートフィルタ（日付フィルタ）AutoFilter メソッド

日付フィルタを使用してレコードを抽出する Excel 2007 から「日付フィル …

: 次の検索（FindNext メソッド,FindPrevious メソッド）

FindNext メソッド Find メソッドで開始された検索を継続します。引数 …

: フリガナの取得（GetPhonetic メソッド）

GetPhonetic メソッド GetPhonetic メソッドは、指定した文 …

PREV: 対象のセルを参照している全てのセルを取得（Dependents プロパティ）
NEXT: セルが結合セルの一部である場合、その結合セルの範囲を取得（MergeArea プロパティ）