View Single Post
 
Old 12-16-2019, 10:04 PM
gmayor's Avatar
gmayor gmayor is offline Windows 10 Office 2016
Expert
 
Join Date: Aug 2014
Posts: 4,106
gmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud of
Default

If you are editing other people's documents the chances are enormous that they are not using the new features of Word, so you could simply saveas and return the document to the latest format before returning the document.

Perhaps easier still is to use a macro to insert the break e.g.

Code:
Sub InsertWord2010PageBreak()
'Graham Mayor - https://www.gmayor.com - Last updated - 17 Dec 2019
Dim oRng As Range
    Set oRng = Selection.Range
    oRng.Collapse 1
    oRng.MoveStartWhile Chr(32), wdBackward
    oRng.MoveEndWhile Chr(32)
    oRng.Text = ""
    oRng.InsertBreak wdPageBreak
    oRng.MoveStart , -3
    oRng.Select
    If oRng.Characters.First = Chr(13) Then oRng.Characters.First.Delete
    If oRng.Characters.Last = Chr(13) Then oRng.Characters.Last.Delete
lbl_Exit:
    Set oRng = Nothing
    Exit Sub
End Sub
__________________
Graham Mayor - MS MVP (Word) (2002-2019)
Visit my web site for more programming tips and ready made processes www.gmayor.com
Reply With Quote