How To Find Specific Words In Word

Please Note: This article is written for users of the post-obit Microsoft Word versions: 2007, 2010, and 2013. If yous 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: Checking for Words and Phrases.

Checking for Words and Phrases

David is a teacher who assigns his students a series of about 20 words and phrases that they must utilize in a composition. Each discussion or phrase must be used at least once. The students get ane signal for each time they use ane of the words or phrases, although null extra for duplicates. David is looking for an easy fashion to mark their work, mayhap with a macro that searches for each word and phrase and creates some sort of record of their usage. Dave's desire is for Discussion to practice the searching and counting then that he can focus his free energy on assessing the quality of the limerick.

If you want to manually figure out how many occurrences there are of a particular word or phrase, you tin can use Word'due south Find feature. Follow these steps if y'all are using Word 2007:

Press Ctrl+F. Word displays the Find tab of the Find and Supervene upon dialog box.
In the Find What box, enter the word or phrase y'all want to find.
Click the More button, if information technology is available.
If you are searching for a unmarried discussion, click the Find Whole Words Only cheque box.
Click the Highlight All Items Found cheque box.
Click Detect All.

Word shows you, in the dialog box, how many occurrences it located of your word or phrase. Y'all tin can find the desired counts fifty-fifty faster if y'all are using Word 2010 or Word 2013:

Printing Ctrl+F. Word displays the Navigation task pane at the left side of the screen. In the pane the Browse tab is selected.
If you are searching for a unmarried give-and-take, click the downwards-pointer at the right of the pocket-size magnifying drinking glass button and cull Options. In the Options dialog box choose Find Whole Words But.
In the box at the top of the Navigation pane, enter the discussion or phrase for which yous want to detect and printing Enter.

Word shows you, at the pinnacle of the Navigation chore pane, how many occurrences it located of your give-and-take or phrase.

These techniques, while handy, lose some of their charm if you demand to repeat it for twenty words and phrases in 30-v different student compositions. Indeed, a macro is a more than applied approach.

Information technology would exist very convenient if the number of occurrences displayed in the Find and Replace dialog box was accessible through VBA. Equally far as I have been able to determine, this value is not accessible. That means that you must rely on repeated searching and counting in the macro itself. I good case of how this can exist done is found in the Microsoft Cognition Base of operations:

http://back up.microsoft.com/?kbid=240157

The folio indicates that the code is for Word 2000, simply it will piece of work but fine with Give-and-take 2007 and Give-and-take 2010. The lawmaking in this page can be changed, relatively hands, to search for a series of words or phrases and display all the results at in one case. Another rather unique approach is to reverse the assumptions about the student compositions: assume that they employ each of the words or phrases (they start with a score of 20 if there are twenty words and phrases) and only decrease points if they don't apply one of them.

Sub ScoreCard()     Dim iScore As Integer     Dim iTopScore As Integer     Dim WordList Equally Variant     Dim i As Integer     Dim sUnused As String      ' Enter the words or phrases in the array below;     ' each word or phrase in quotation marks and     ' separated by commas     WordList = Array("Mr.", "jelly", "wince", _       "proper", "fix", "compound", "loftier and dry out")      ' Counts the number of words in the array     iTopScore = CInt(UBound(WordList)) + i     iScore = iTopScore      ' Counts the number of "misses"     sUnused = ""     For i = one To iTopScore         With Pick.Find             .Forward = Truthful             .Wrap = wdFindContinue             .Format = False             .MatchCase = Fake             .MatchAllWordForms = False             .MatchWholeWord = True             .Execute FindText:=WordList(i - 1)         Cease With         If Selection.Find.Found = Fake So            iScore = iScore - 1            sUnused = sUnused & vbCrLf & WordList(i - ane)         End If     Next i      ' Displays the score     If iScore = iTopScore So         sUnused = "All words and phrases were used."     Else         sUnused = "The following words and phrases" & _           " were not used:" & sUnused     End If     sUnused = vbCrLf & vbCrLf & sUnused     MsgBox Prompt:="The score is " & iScore & _       " of " & iTopScore & sUnused, Championship:="What'southward the Score?" Finish Sub

The macro displays a score for the composition and also displays whatever of the words or phrases that were not used in the composition.

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

WordTips is your source for cost-effective Microsoft Discussion training. (Microsoft Word is the almost popular word processing software in the world.) This tip (9261) applies to Microsoft Word 2007, 2010, and 2013. You can observe a version of this tip for the older carte interface of Discussion here: Checking for Words and Phrases.

Author Bio

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