Resetting Spelling and Grammar Checking on Multiple Documents

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


1

Sara has a folder containing about 30 Word documents. She needs to reset and then re-run Spelling and Grammar checking on all the documents. Starting the check is quick and easy, but it's a pain to go to File, then Options, then Proofing, then Recheck on each document separately. She wonders if there is a way to reset the Spelling and Grammar checking on multiple files at once.

The only way that this can be done is through the use of a macro that will, essentially, go through the same steps that you would have done manually. (Since it is a macro, however, it can do those steps much faster than you could possibly do them.) The following macro is an example of one way to accomplish the task:

Sub ResetDocs()
    Dim sPath As String
    Dim sFile As String

    sPath = "c:\Path\To\Documents\"

    sFile = Dir(sPath & "*.doc*")
    Application.ScreenUpdating = False
    Do While sFile <> ""
        Documents.Open sPath & sFile
        With ActiveDocument
            .Range.NoProofing = False
            Application.ResetIgnoreAll
            .SpellingChecked = False
            .GrammarChecked = False
            .Close SaveChanges:=wdSaveChanges
        End With
        sFile = Dir()
    Loop
    Application.ScreenUpdating = True
End Sub

In order to use the macro, all you need to do is change the path that is assigned to the sPath variable. This should be the path to the folder containing your documents, and you'll want to make sure that it ends with a backslash. The macro opens any document files in the folder and resets all the spelling- and grammar-checking-related settings in the document. Then, the document is saved. The next time you open the documents normally, you should notice that the checking should occur as normal.

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 (1930) applies to Microsoft Word 2007, 2010, 2013, 2016, 2019, 2021, and Word in Microsoft 365.

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

Automatically Sorting as You Enter Information

When entering information into a worksheet, you may want it to always be in a correctly sorted order. Excel allows you to ...

Discover More

Comma-Delimited and MS-DOS CSV Variations

Excel provides different file formats you can use to export your worksheet information. One such file format is CSV, or ...

Discover More

Monday's Date on Friday's Report

Automatically putting today's date at the top of a report is easy. Putting a different date, automatically, can be more ...

Discover More

Do More in Less Time! Are you ready to harness the full power of Word 2013 to create professional documents? In this comprehensive guide you'll learn the skills and techniques for efficiently building the documents you need for your professional and your personal life. Check out Word 2013 In Depth today!

More WordTips (ribbon)

Catching Single-Letter Spelling Errors

There have been times when I've reviewed my writing and found lots of "lone letters," detached by a single space from the ...

Discover More

Words Disappear from the Custom Dictionary

The spell-checking tool built into Word allows you to easily add words to a custom dictionary. What happens, though, if ...

Discover More

Limiting Spell Checking

Spell check a document, and Word normally checks several different dictionaries. Here's how to limit the dictionary ...

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 six minus 5?

2024-05-29 09:56:37

Andrew

I find that in cases such as these it's better (and not hard) to select the files in a folder rather than automatically operating on all the files in a hard-coded folder or, even more simply, having the macro process all open documents.

Here is a skeletal macro of how I do it using the select-files method:

Andy.

Public Sub ProcessFiles()
Dim F As Variant
Dim PreviousDocCount as Long
Dim AlreadyOpen as Boolean

With Application.FileDialog(msoFileDialogOpen) ' Cf. Dialogs(wdDialogFileOpen) to have open-and-repair etc. via the dialog
.FilterIndex = 1 ' My way: Always start with "*.*"
If .Show <> -1 Then Exit Sub
For Each F In .SelectedItems
PreviousDocCount = Documents.Count
Documents.Open FileName:=F, AddToRecentFiles:=True
AlreadyOpen = Documents.Count = PreviousDocCount

' Process ActiveDocument here .

if not AlreadyOpen then ActiveDocument.Close wdSaveChanges
Next F
End With
End Sub


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.