Application.AutoCorrect Property

Word Developer Reference

Returns an AutoCorrect object that contains the current AutoCorrect options, entries, and exceptions. Read-only.

Syntax

expression.AutoCorrect

expression   A variable that represents an Application object.

Example

This example adds an AutoCorrect replacement entry. After this code runs, every instance of "sr" that's typed in a document will automatically be replaced with "Stella Richards."

Visual Basic for Applications
  
    AutoCorrect.Entries.Add Name:= "sr", Value:= "Stella Richards"

This example deletes the specified AutoCorrect entry it if it exists.

Visual Basic for Applications
  Dim strInput as String
Dim aceLoop as AutoCorrectEntry
Dim blnMatch as Boolean
Dim intConfirm as Integer

blnMatch = False

strInput = InputBox("Enter the AutoCorrect entry to delete.")

For Each aceLoop in AutoCorrect.Entries With aceLoop If .Name = strInput Then blnMatch = True intConfirm = _ MsgBox("Are you sure you want to delete " & _ .Name, 4) If intConfirm = vbYes Then .Delete End If End If End With Next aceLoop

If blnMatch <> True Then MsgBox "There was no AutoCorrect entry: " & strInput End If

See Also