AutoCorrect.Entries Property (Word)

Returns an AutoCorrectEntries collection that represents the current list of AutoCorrect entries.

Syntax

expression. Entries

expression A variable that represents an 'AutoCorrect' object.

Remarks

This list corresponds to the list of AutoCorrect entries on the AutoCorrect tab in the AutoCorrect dialog box. Read-only. For information about returning a single member of a collection, seeReturning an Object from a Collection.

Example

This example displays the total number of AutoCorrect entries.

MsgBox AutoCorrect.Entries.Count

This example deletes the specified AutoCorrect entry if it exists.

Dim strEntry As String 
Dim acEntry As AutoCorrectEntry 
Dim blnMatch As Boolean 
Dim intResponse As Integer 
 
strEntry = InputBox("Enter the AutoCorrect entry to delete.") 
blnMatch = False 
 
For Each acEntry in AutoCorrect.Entries 
 If acEntry.Name = strEntry Then 
 blnMatch = True 
 intResponse = _ 
 MsgBox("Are you sure you want to delete " _ 
 &; acEntry.Name, 4) 
 If intResponse = vbYes Then 
 acEntry.Delete 
 End If 
 End If 
Next acEntry 
 
If blnMatch <> True Then 
 MsgBox "There was no AutoCorrect entry: " &; strEntry 
End If

See also

AutoCorrect Object