How can I make Word 2013 open in Draft View by default?

Anonymous
2013-04-16T04:27:08+00:00

I use Word 2013 on a 14" laptop and the default view, Print Layout, is a colossal waste of space, but I can't get the program to open in Draft View by default. Have done the following:

  • Changed settings to "allow documents to open in Draft View"
  • Saved documents in Draft View...they re-open in Print Layout
  • Tried to change New Document template to Draft View but new documents still only open in Print Layout.

I hope that the answer is not "you have to change to draft view every single time you open a document." There are already a lot more clicks / action in Word 2013 than in previous versions.

Have searched forums but there doesn't seem to be an answer for this in Word 2013.

Thanks for your assistance.

BP211

Microsoft 365 and Office | Word | For home | Windows

Locked Question. This question was migrated from the Microsoft Support Community. You can vote on whether it's helpful, but you can't add comments or replies or follow the question.

0 comments No comments
Answer accepted by question author
Jay Freedman 208.3K Reputation points Volunteer Moderator
2013-04-16T19:49:33+00:00

Follow the instructions at http://www.gmayor.com/installing_macro.htm to put the following two macros into a module in the Normal.dotm template:

Sub AutoOpen()

    ActiveWindow.View.Draft = True

End Sub

Sub AutoNew()

    ActiveWindow.View.Draft = True

End Sub

The first will run automatically every time you open an existing document, and the second will run when you create a new document.

Was this answer helpful?

10+ people found this answer helpful.
0 comments No comments
Answer accepted by question author
Jay Freedman 208.3K Reputation points Volunteer Moderator
2013-04-19T03:51:09+00:00

That one's hidden about as deeply as possible. A lot of the things in the Options dialog are properties of the Options object in VBA, so you can say things like Options.Overtype = False. Controlling the draft font display is not one of those things. :-(

Actually, it's a throwback to Word 2003 and earlier. The Dialogs collection includes a member called Dialogs(wdDialogToolsOptionsView), which refers to a tab of the Options dialog that no longer exists (and of course the Options command isn't on the Tools menu, which doesn't exist). That dialog has an argument named DraftFont, which is a boolean (true/false) value. So this is how you do it:

Sub AutoOpen()

Dim dlg As Dialog

Set dlg = Dialogs(wdDialogToolsOptionsView)

With dlg

    .DraftFont = False

    .Execute

End With

ActiveWindow.View.Draft = True

End Sub

and similarly for AutoNew().

By the way, both your original problem and this one point the the probability that there's something amiss in your Windows registry, because these things should be saved there automatically. This trouble sometimes happens when you have certain third-party add-ins or other programs that interfere with Word's ability to write to the registry. There can also be misconfiguration of the permissions for certain parts of the registry. If you think that working with macros is harrowing, you don't want to know how to troubleshoot the registry. If these two macros solve the problem, leave well enough alone.

Was this answer helpful?

1 person found this answer helpful.
0 comments No comments

59 additional answers

Sort by: Most helpful
  1. Stefan Blom 352.5K Reputation points MVP Volunteer Moderator
    2013-11-04T23:17:16+00:00

    I believe that Matthias' conclusion is correct for Word 2013: it no longer saves the view with documents.

    Was this answer helpful?

    0 comments No comments
  2. Anonymous
    2013-04-19T17:57:45+00:00

    Fantastic.  Worked! And with only a moment of cold sweat from gazing into the abyss. It was probably the registry gazing back. So yeah, I'll leave that alone. Thanks!

    Was this answer helpful?

    0 comments No comments
  3. Anonymous
    2013-04-18T19:42:13+00:00

    Follow the instructions at http://www.gmayor.com/installing_macro.htm to put the following two macros into a module in the Normal.dotm template:

    Sub AutoOpen()

        ActiveWindow.View.Draft = True

    End Sub

    Sub AutoNew()

        ActiveWindow.View.Draft = True

    End Sub

    The first will run automatically every time you open an existing document, and the second will run when you create a new document.

    Jay, thanks again for your suggestion. Unfortunately I've run into another problem with the fix. When I open a document it does open in Draft View now, but it opens in a draft font and doesn't show photos etc. When I go to Advanced options, sure enough the "Show Document Content>Use draft font in Draft and Outline views" box is checked. I can uncheck it but if I close the program and open a document, it goes back to being checked.

    Armed with my new macro knowledge I just took a look around to see if there's a some kind of "draft font = false" but I don't see it.

    Any suggestions on this? Opening in Draft Font isn't workable for me unfortunately.

    Was this answer helpful?

    0 comments No comments