<div>
...note: &nbsp;The document has &quot;Editing Restrictions&quot;: Allow only this type of editing in the document: Filling in forms. &nbsp; This means that the VBA code must temporarily removethe editing restriction.
</div>


...note:  The document has "Editing Restrictions": Allow only this type of editing in the document: Filling in forms.   This means that the VBA code must temporarily removethe editing restriction.

<div>
Not sure how to handle the editing restrictions, but a sequence like this will delete all but the first three pages of a document. &nbsp;Jump to page 4, back up a character, select through to end-of-document, and delete selection.<br />
<br />

<pre><code id="code-20-37004794-1">    Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Name:=&quot;4&quot;
    Selection.MoveLeft Unit:=wdCharacter, Count:=1
    Selection.EndKey Unit:=wdStory, Extend:=wdExtend
    Selection.Delete Unit:=wdCharacter, Count:=1</code></pre>
</div>


Not sure how to handle the editing restrictions, but a sequence like this will delete all but the first three pages of a document.  Jump to page 4, back up a character, select through to end-of-document, and delete selection.



    Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Name:="4"
    Selection.MoveLeft Unit:=wdCharacter, Count:=1
    Selection.EndKey Unit:=wdStory, Extend:=wdExtend
    Selection.Delete Unit:=wdCharacter, Count:=1

DelIns.doc

<div>
<div class="content wysiwyg-content">
I have a 5-page MS Word document and want to put in a button or other mechanism that will allow the user to delete the last 3 pages of the document, which are instructions, leaving only the first two pages.<br />
<br />
Thanks, --Andres
</div>
</div>


I have a 5-page MS Word document and want to put in a button or other mechanism that will allow the user to delete the last 3 pages of the document, which are instructions, leaving only the first two pages.

Thanks, --Andres

MS Word - Macro to delete last 3 pages of document

Microsoft Word is a commercial document editing program that is part of the Microsoft Office suite. It features numerous text-editing tools for creating richly formatted documents, along with tools for the use of macros in Word documents. Word's native file formats are denoted either by a .doc or .docx file extension. Plugins permitting the Windows versions of Word to read and write formats it does not natively support, such as the OpenDocument format (ODF) are available. Word can import and display images in common bitmap formats such as JPG and GIF. It can also be used to create and display simple line-art.