セル結合の解除

Excel VBA を使って結合されたセルを解除する方法について解説します。

(2022 年 06 月 14 日公開 / 2022 年 06 月 14 日更新)

セル結合を解除する

セルの結合を解除するには、結合するセルの元になった複数のセルの中のどれか1つのセルを表すRangeオブジェクトの「MergeCells」プロパティに「False」を設定します。

Dim range1 As Range

Set range1 = Range("A1")
range1.MergeCells = False

まとめて次のように記述しても構いません。

Range("A1").MergeCells = False

結合を解除するのに指定するセルは、結合されているセルに元々含まれていたセルであれば、どのセルであっても構いません。

サンプルプログラム

では簡単なサンプルで試してみましょう。まず下記のようなExcelファイルを用意します。

セル結合を解除する

セルB2の位置にあるセルの結合を解除します。

Sub テスト()

    Dim range1 As Range
    
    Set range1 = Range("C2")
    range1.MergeCells = False
    
End Sub

上記マクロを実行すると次のようになります。

セル結合を解除する

少し分かりにくいですが、セルB2の位置にあったセルは結合が解除されて、それぞれセルB2、セルC2、セルD2になっています。

-- --

Excel VBA を使って結合されたセルを解除する方法について解説しました。

( Written by Tatsuo Ikura )

広告
Profile
profile_img

著者 / TATSUO IKURA

初心者~中級者の方を対象としたプログラミング方法や開発環境の構築の解説を行うサイトの運営を行っています。