Please Note: This article is written for users of the following Microsoft Word versions: 2007, 2010, 2013, 2016, 2019, and Word in Microsoft 365. If you are using an earlier version (Word 2003 or earlier), this tip may not work for you. For a version of this tip written specifically for earlier versions of Word, click here: Creating Multiple Blank Documents in One Step.

Creating Multiple Blank Documents in One Step

Written by Allen Wyatt (last updated December 17, 2021)
This tip applies to Word 2007, 2010, 2013, 2016, 2019, and Word in Microsoft 365


1

There are times when Larry absolutely needs to create four or more new blank documents. He wonders if there is a way to create four new blank documents (it would be nice to input how many blank documents needed) at once.

There are a few ways you can approach this problem. If all you want to do is create four new documents, all based on the Normal template, the easiest way is to simply press Ctrl+N four times. (Actually, you can hold down the Ctrl key and press N four times.) The result is four blank documents, ready to be used.

If your documents need to be based on a different template than the Normal template, then it is best to use a macro. The following macro prompts the user for how many documents should be created, and then creates them based on the BusinessReport template.

Sub NewDocuments()
    Dim Answer As Variant
    Dim iNewDocs As Integer
    Dim J As Integer

    Answer = InputBox("How many new documents?")
    iNewDocs = CInt(Answer)
    For J = 1 to iNewDocs
        Documents.Add Template:="BusinessReport", NewTemplate:=False, _
          DocumentType:=wdNewBlankDocument
    Next J
End Sub

The macro could be assigned to a shortcut key or to a button on a toolbar, ready to create your documents. You could also take a slightly different approach with the same code. Create a new document based on the desired template (such as the BusinessReport template), and then add this macro to the template:

Sub AutoOpen()
    Dim Answer As Variant
    Dim iNewDocs As Integer
    Dim J As Integer

    Answer = InputBox("How many more docs?", "Doc Count")
    iNewDocs = CInt(Answer)
    For J = 1 To iNewDocs
        Documents.Add Template:="BusinessReport", NewTemplate:=False, _
          DocumentType:=wdNewBlankDocument
    Next
End Sub

Save the document under a name such as "MultipleDocs.docm." The basis of the macro is the same as the previous one. The difference is the name given to the macro. Since it uses the special AutoOpen name, then whenever the MultipleDocs document is subsequently opened, the macro is automatically run and the user is asked how many additional documents to create.

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 (11237) applies to Microsoft Word 2007, 2010, 2013, 2016, 2019, and Word in Microsoft 365. You can find a version of this tip for the older menu interface of Word here: Creating Multiple Blank Documents in One Step.

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. ...

MORE FROM ALLEN

Forcing Manual Calculation For a Workbook

If you have a large, complex workbook, you may want to make sure that it is always calculated manually instead of ...

Discover More

Adjusting Times for Time Zones

Collect a series of times in a worksheet, and you might need to adjust those times for various time zones. This involves ...

Discover More

Formatting Page Numbers

Need to format the page numbers you added to your document? Word makes it easy, using the same techniques you use to ...

Discover More

Comprehensive VBA Guide Visual Basic for Applications (VBA) is the language used for writing macros in all Office programs. This complete guide shows both professionals and novices how to master VBA in order to customize the entire Office suite for their needs. Check out Mastering VBA for Office 2010 today!

More WordTips (ribbon)

Read-Only Embedded Fonts

If you receive a document from somebody else, you might not be able to edit it if the document contains fonts that you ...

Discover More

Opening a Document as Read-Only

Afraid of messing up an existing document by some changes you are considering? Consider opening the document as ...

Discover More

Read-Only Documents

Using both Word and Windows, there are a variety of ways you can mark a file as read-only so that it cannot be changed. ...

Discover More
Subscribe

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.

What is 6 - 0?

2018-05-22 07:06:24

AnonC

Ctrl+N opens up a new file for me... How do I change it to Word Doc?


This Site

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

Videos
Subscribe

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

(Your e-mail address is not shared with anyone, ever.)

View the most recent newsletter.