cells」という、検索でこのサイト・インストラクターのネタ帳へのアクセスがありました。VBAのコードを探している方による検索です。実務での利用シーンを考えると、Cellsプロパティだけではなく、他のプロパティもあわせて利用することになるはずですが、ここでは参考になりそうな、セル結合を行うマクロを3つご紹介します。[スポンサードリンク]Cellsを使わずにセル結合を行うサンプルマクロまず、Cellsプロパティを使わない、セル結合の基本から確認しましょう。以下のマクロを実行するとアクティブなシートのA1:B3セルが結合されます。SubRangeプロパティの引数を2つ指定すると、指定されたセル範囲全体を表すRangeオブジェクトを取得できます。RangeオブジェクトのMergeメソッドを使うと、そのRangeオブジェクトが結合されます。これがVBAでセルの結合を行う際の基本です。RangeとCellsを使ってセル結合を行うサンプルマクロ次に、Cellsプロパティも使ったサンプルです。以下のマクロでA6:B8セルが結合されます。Sub先にご紹介したRangeプロパティの2つの引数に、Cellsプロパティを使って返されるRangeオブジェクトを指定しているコードです。"B")」というオブジェクト式で8行B列のセルであるB8セルを表すRangeオブジェクトを取得できます。"B"))」というオブジェクト式はA6:B8セルを表すRangeオブジェクトが取得できるわけです。そのRangeオブジェクトのMergeメソッドを呼ぶことでA6:B8セルが結合されます。RangeプロパティとCellsプロパティを使ってセル範囲を指定するコードの応用です。CellsとResizeを組み合わせてセル結合を行うサンプルマクロRangeプロパティとCellsプロパティを組み合わせた上記のマクロを応用すれば、実務で必要なセル結合マクロは作れるはずですが、Resizeプロパティを使って以下のような書き方もできます。以下のマクロを実行するとA11:B13セルが結合されます。"A")」というオブジェクト式で11行目A列のセルであるA11セルを表すRangeオブジェクトが取得できます。そのRangeオブジェクトのResizeプロパティを使って取得するセル範囲を拡大しています。2)」というオブジェクト式で、A11セルから3行2列拡大したA11:B13セルを表すRangeオブジェクトが取得できます。そのRangeオブジェクトのMergeメソッドが呼ばれてA11:B13セルが結合されます。Officeの使い方などを紹介し続け(2012年頃からはVBA関連記事が多め)、毎日5万人の方にご覧いただいています。