Propriété AutoCorrect.Entries (Word)

Renvoie une collection AutoCorrectEntries qui représente la liste actuelle des entrées de correction automatique.

Syntaxe

expression. Entries

Expression Variable qui représente un objet « AutoCorrect ».

Remarques

Cette liste correspond à celle qui est affichée dans la boîte de dialogue Correction automatique sous l’onglet Correction automatique. En lecture seule. Pour plus d’informations sur le renvoi d’un seul membre d’une collection, consultez Renvoi d’un objet à partir d’une collection.

Exemple

Cet exemple montre comment afficher le nombre total de corrections automatiques.

MsgBox AutoCorrect.Entries.Count

Cet exemple montre comment supprimer la correction automatique spécifiée si elle existe.

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

Voir aussi

Objet AutoCorrect

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.