【VBA】ExcelシートDisplayPageBreaksでページ区切り線の表示・非表示を変更する方法

2024年3月27日2025年2月28日

こんにちは！大阪市を拠点に活動している『縁紡ぐ』の稲垣です。

SWELLを使ったホームページ制作や、Excel、ACCESS、RPAなどのシステム開発を行っています。
また、Excel、Word、Outlookの研修や、情報セキュリティ研修も行っています。身近なITの相談相手になりたいと思っています。

お気軽にお問い合わせください。

DisplayPageBreaksでページ区切り線の表示・非表示を変更する方法

稲垣

今回は、シートオブジェクトのプロパティにある『DisplayPageBreaks』でページ区切りの表示、非表示をVBAで変更する方法を紹介します

シートプロパティの表示方法方法は、こちらを参照してください。

まずは、DisplayPageBreaksのページ区切り線について確認をしたいと思います。

ページ区切り線は、印刷時にどの部分がどのページに出力されるかを視覚的に確認するための線です

こんな感じで、どこからページが変わるかを点線で表してくれるので、編集する時に便利に使えます。

稲垣

VBAでは、DiaplayPageBreaksの値を変更することで、表示非表示をコントロールできるようになります

DisplayPageBreaksプロパティはBoolean型（TrueまたはFalse）の値で設定します。

Trueに設定すると、Excelシート上にページ区切り線が表示
Falseに設定すると、ページ区切り線は非表示

以下に、VBAでDisplayPageBreaksプロパティを使用するサンプルコードを示します：

Sub setDisplayPageBreaksFalse()
    ' アクティブなシートのDisplayPageBreaksプロパティにFalseをセット
    ActiveSheet.DisplayPageBreaks = False
End Sub

Sub setDisplayPageBreaksTrue()
    ' アクティブなシートのDisplayPageBreaksプロパティにTrueをセット
    ActiveSheet.DisplayPageBreaks = True
End Sub

今回は、ExcelVBAでDisplayPageBreaksをコントロールする方法をご紹介しました。VBAは、開発費が抑えられるため業務改善の初期段階ではとても有効です。ぜひ、挑戦してみてくださいね！作成のご相談も承っておりますので、お気軽にお問合せください。

よかったらシェアしてね！