AddRichText Method

Applies To

AutoCorrectEntries collection object.

Description

Creates a formatted AutoCorrect entry, preserving all text attributes of the specified range. Returns an AutoCorrectEntry object. The RichText property for entries added by using this method returns True. If AddRichText isn't used, inserted AutoCorrect entries conform to the current style.

Syntax

expression.AddRichText(Name, Range)

expression Required. An expression that returns an AutoCorrectEntries object.

Name Required String. The text to replace automatically with Range.

Range Required Range object. The formatted text that Word will insert automatically whenever Name is typed.

See Also

AutoCorrect property, RichText property.

Example

This example stores the selected text as a formatted AutoCorrect entry that will be inserted automatically whenever "NewText" is typed.

If Selection.Type = wdSelectionNormal Then    'Checks for text selected.
    AutoCorrect.Entries.AddRichText "NewText", Selection.Range
Else
    MsgBox "You need to select some text."
End If

This example stores the third word in the active document as a formatted AutoCorrect entry that will be inserted automatically whenever "NewText" is typed.

AutoCorrect.Entries.AddRichText "NewText", ActiveDocument.Words(3)