【EXCEL VBA】全シートの改ページを一括解除したい

全シートの改ページを一括解除する方法です。Excelのメニューから「ページレイアウト」ー「改ページ」ー「すべてのシートの改ページを解除」から改ページを削除することとができます。これと同じ事をVBAから実行する方法を紹介します。

ResetAllPageBreaks関数で解決する

SheetオブジェクトのResetAllPageBreaks関数をコールします。そのまんまですね。

サンプルプログラムを確認する（コピペOK）

Sub sample()

    Dim ws As Worksheet

    For Each ws In Worksheets
        ws.ResetAllPageBreaks
    Next

End Sub

全てのシートに対して処理を行う場合に、以下のイデオムはよく使います。

For Each ws In Worksheets