removing Page Breaks with VBA

[Bob Slattery]

Thanks In Advance,

I would like to remove all Page Breaks in a Document using VBA.

Any assistance would be appreciated.

Sincerely,
Bob

 

[Dave Lett]

Hi Bob,

You can use something like the following:

With Selection
.HomeKey Unit:=wdStory
With .Find
.ClearFormatting
.Text = "^m" ' manual page break
With .Replacement
.ClearFormatting
.Text = ""
End With
.Execute Replace:=wdReplaceAll
End With
End With

HTH