Excelでの文字列の折り返しの設定

Excelで文章を書く際に、セルの中で折り返して表示したいことがあります。

Excel2003まではセルの書式設定などからメニューを辿っていく必要がありましたが、リボン化によりそれは不要になりました。

Excel2007以降ではホームタブ→配置→折り返して全体を表示する　をクリックすることで折り返しの設定と解除を行うことができます。

VBAでも同様の設定を行うことが出来ます。

セルの書式設定とプロパティの関係が以下の図になります。

ここでは図の黄色部分の前後スペースを設定するWrapTextプロパティについて説明します。

構文

Rangeオブジェクトにはセル範囲を指定します。

WrapTextは設定と取得を行うことが出来ます。

Trueが折り返しあり、Falseが折り返し解除です。

サンプルコード

サンプルコードを３つ用意しました。セル範囲、シート全体、ブック全体、のそれぞれの折り返しの設定と解除を行うマクロです。
以下のマクロは選択セル範囲の折り返しの設定と解除を交互に行います。

こちらのマクロはシート全体の折り返しの設定と解除を行います。

こちらのマクロはブック全体の折り返しの設定と解除を行います。