動作検証バージョン:Windows 11 Home + 64bit Excel バージョン 2504(ビルド18730.20142クイック実行)
「vba 折り返して全体を表示する 列」
といった検索キーワードでアクセスがありました。
[スポンサードリンク]
Excel VBAで、[セルの書式設定]ダイアログボックス-[配置]タブ-[文字の制御]-[折り返して全体を表示する]を制御するには、
どのようなコードを書けばいいのかを調べていらしたのでしょうか。
列の折り返して全体を表示するをOnにするサンプルマクロ
以下のExcelマクロを実行すると、アクティブシートのA列の[折り返して全体を表示する]がOnの状態になります。
Sub 折り返して全体を表示するをOnにする()
Columns("A").WrapText = True
End Sub
Columns("A").WrapText = True
End Sub
サンプルマクロで行っている処理
ExcelのRangeオブジェクトに用意されているWrapTextプロパティに、
論理値Trueを指定することで[折り返して全体を表示する]がOnの状態になります。
どのセル範囲を設定するかは、「.WrapText」の前の、Rangeオブジェクトを取得する式で指定します。
今回は列全体の設定をするので、グローバルメンバーのColumnsプロパティを使って、「Columns("A")」と指定しています。
[スポンサードリンク]
Home » Excel VBA Rangeオブジェクト » 行・列を表すRange » VBAで列の折り返して全体を表示するをOnにする