Range.SynonymInfo Property (Word)
Returns a SynonymInfo object that contains information from the thesaurus on synonyms, antonyms, or related words and expressions for the contents of a range.
Syntax
expression .SynonymInfo
expression Required. A variable that represents a Range object.
Example
This example returns a list of synonyms for the selection's first meaning.
Slist = Selection.Range.SynonymInfo.SynonymList(Meaning:=1)
For i = 1 To UBound(Slist)
Msgbox Slist(i)
Next i