Application.AutoCorrect-Eigenschaft (Word)

Gibt ein AutoCorrect-Objekt zurück, das die aktuellen AutoKorrektur-Optionen, -Einträge und -Ausnahmen enthält. Schreibgeschützt.

Syntax

Ausdruck. AutoCorrect

expression Eine Variable, die ein Application-Objekt darstellt.

Beispiel

In diesem Beispiel wird ein AutoKorrektur-Ersetzungseintrag hinzugefügt. Nach Ausführung dieses Codes werden alle Instanzen von sr in einem Dokument automatisch durch Stella Richards ersetzt.

AutoCorrect.Entries.Add Name:= "sr", Value:= "Stella Richards"

In diesem Beispiel wird der angegebene AutoKorrektur-Eintrag, falls vorhanden, gelöscht.

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

Siehe auch

Application-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.