[Okta Webinar] Learn how to a build a cloud-first strategyRegister Now

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 363
  • Last Modified:

VBA / Excel 97 PageBreak Control

I need to take an existing XLS file and reformat it.
After changing the font size, the page breaks are
not positioned correctly. I plan to take out
all PageBreaks and then insert them based the contents
of cells in the first column. In other words
, the procedure I need is to end the page
when the "paragraph" is done and some pages
will have more white space at the bottom than
others.
 I attempt and fail to remove the PBs with:

For Each pb In Worksheets(2).HPageBreaks  
    pb.Delete
Next
 Then I have to "rewind" and start putting PBs
back in passed on logic described above.

How do I remove all PBs.
  Many thanks, Mark
0
mbarron
Asked:
mbarron
1 Solution
 
bin_huwairibCommented:
mbarron,

To remove all pagebreaks use the following:

Worksheets("Sheet1").Cells.PageBreak = xlPageBreakNone


Best regards
Bin Huwairib
0
 
mbarronAuthor Commented:
Many thanks, I am very grateful for your time.
 Mark
0

Featured Post

Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Tackle projects and never again get stuck behind a technical roadblock.
Join Now