[RESOLVED] Word: End of Document

[nit22]

The below code helps to remove the page beaks in the activedocument

Dim myrange As Range

Set myrange = ActiveDocument.Range
myrange.Find.ClearFormatting
myrange.Find.Replacement.ClearFormatting
myrange.Find.Execute findtext:="^m", replacewith:="", Replace:=wdReplaceAll, Forward:=True, MatchWildcards:=False


Thanks,
nit22