Sub test() Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets ws.Cells.PageBreak = xlPageBreakNone Next ws End Sub
Select allOpen in new window
Private Sub Workbook_Open() Dim ws As Worksheet For Each ws In ThisWorkbook.Worksheets ws.Cells.PageBreak = xlPageBreakNone Next ws End Sub
Open in new window