Displays the Thesaurus dialog box, which lists alternative word choices, or synonyms, for the text in the specified range.
expression.CheckSynonyms
expression Required. An expression that returns a Range object.
Example
This example displays the Thesaurus dialog box with synonyms for the selected text.
Selection.Range.CheckSynonyms
This example displays the Thesaurus dialog box with synonyms for the first word in the active document.
ActiveDocument.Words(1).CheckSynonyms