Please Note: This article is written for users of the following Microsoft Word versions: 97, 2000, 2002, and 2003. If you are using a later version (Word 2007 or later), this tip may not work for you. For a version of this tip written specifically for later versions of Word, click here: Deleting a Page.

Deleting a Page

Written by Allen Wyatt (last updated March 7, 2015)
This tip applies to Word 97, 2000, 2002, and 2003

Need a quick way to delete the current page in your document? Here's a macro that will do the trick:

Sub Delete_Page()
    ActiveDocument.Bookmarks("\Page").Range.Delete
End Sub

The macro uses a special system-defined bookmark to refer to the current page. Assign the macro to a shortcut key and you have a way to easily delete the current page—the one in which the insertion point is located. The macro bases its determination of a "page" on the current pagination of the document, which is affected by the printer driver you are using and other formatting characteristics of the document.

You should keep in mind that Word is dynamic in how it flows information in a document. Thus, let's say that you run this macro while the insertion point is located in page 5. It dutifully selects the contents of page 5 and deletes those contents, but Word then reflows the document so that everything after the old page 5 is moved up to occupy the void created—page 6 becomes page 5, page 7 becomes page 6, etc.

Note:

If you would like to know how to use the macros described on this page (or on any other page on the WordTips sites), I've prepared a special page that includes helpful information. Click here to open that special page in a new browser tab.

WordTips is your source for cost-effective Microsoft Word training. (Microsoft Word is the most popular word processing software in the world.) This tip (227) applies to Microsoft Word 97, 2000, 2002, and 2003. You can find a version of this tip for the ribbon interface of Word (Word 2007 and later) here: Deleting a Page.

Author Bio

Allen Wyatt

With more than 50 non-fiction books and numerous magazine articles to his credit, Allen Wyatt is an internationally recognized author. He is president of Sharon Parq Associates, a computer and publishing services company. Learn more about Allen...

MORE FROM ALLEN

Opening a Workbook but Disabling Macros

Macros that run automatically when you open or close a workbook are quite helpful. You may not want them to run, however, ...

Discover More

Standardizing Note Reference Placement

Want to modify where an endnote or footnote reference appears in relation to the punctuation in a sentence? Here's a way ...

Discover More

Removing Only One Text Highlighting Color

If you use text highlighting extensively in your documents, you may want to selectively remove some of the colors. This ...

Discover More

Create Custom Apps with VBA! Discover how to extend the capabilities of Office 2013 (Word, Excel, PowerPoint, Outlook, and Access) with VBA programming, using it for writing macros, automating Office applications, and creating custom applications. Check out Mastering VBA for Office 2013 today!

More WordTips (menu)

Transposing Letters

My fat fingers sometimes result in typing letters in the wrong order. Here's a quick tool that allows you to easily ...

Discover More

Replacing Random Text with Your Own Text

Word includes a little-known function that allows you to put "filler text" into your document. If you want this function ...

Discover More

Inserting Text with a Shortcut Key

The AutoText capabilities of Word are quite powerful, allowing you to insert all sorts of "boilerplate" information in ...

Discover More

FREE SERVICE: Get tips like this every week in WordTips, a free productivity newsletter. Enter your address and click "Subscribe."

View most recent newsletter.

Comments

If you would like to add an image to your comment (not an avatar, but an image to help in making the point of your comment), include the characters [{fig}] (all 7 characters, in the sequence shown) in your comment text. You’ll be prompted to upload your image when you submit the comment. Maximum image size is 6Mpixels. Images larger than 600px wide or 1000px tall will be reduced. Up to three images may be included in a comment. All images are subject to review. Commenting privileges may be curtailed if inappropriate images are posted.

Notify me about new comments ONLY FOR THIS TIP

Notify me about new comments ANYWHERE ON THIS SITE

Hide my email address

What is two more than 7?

2018-10-02 21:01:20

Tim

Hi,

I'm using this in a 4-page word document with different paper sizes and orientation for each page:
1st page: A4 portrait
2nd page: A4 Landscape
3rd page: A3 landscape
4th page: A3 portrait

the delete macro works on the first 3 pages, but not on the last one.

I tried rearranging the pages, it still doesn't work on the last page.

Can you help me with this? THnx

2016-08-16 02:27:06

Mohsen

3. You Could add this to ribbon by going to file> Option> Customize ribbon> Choose Macro from drop down and add and rename the Deletepage button to ribbon (From left to right box, Need to create new group)
Sincerely, Mohsen

2016-08-16 02:11:52

Mohsen

1. View> Macros > View Macros> Create> Give A name (Delete)
Clear the program and Type bellow lines in the opened visual basic program and save.
Sub Delete_Page()
ActiveDocument.Bookmarks("Page").Range.Delete
End Sub

2. Press Record Macro and type a new name (DeletePage) and choose button and add this button to quick access bar for all documents and click ok.
3.Run previously created macro in step 1 and press stop recording. You’re done! use your newly created button.

2015-08-13 19:46:44

jason

You need to get rib of the two subs.

Private Sub CommandButton1_Click()
ActiveDocument.Bookmarks("Page").Range.Delete
End Sub

2015-07-17 18:26:10

gary

You would need to delete the line
Sub Delete_Page()
and then delete one of the lines
End Sub

2015-07-08 06:57:01

gregor

Hi,

This is exactly what i was looking for!! But...I am entering this to a button (ActiveX):

Private Sub CommandButton1_Click()
Sub Delete_Page()
ActiveDocument.Bookmarks("Page").Range.Delete
End Sub
End Sub

...Keep getting an end sub error at the first line. Can you help?

This Site

Got a version of Word that uses the menu interface (Word 97, Word 2000, Word 2002, or Word 2003)? This site is for you! If you use a later version of Word, visit our WordTips site focusing on the ribbon interface.