AutoTextEntries-Objekt (Word)
Eine Auflistung von AutoCorrectEntry-Objekten , die die AutoText-Einträge in einer Vorlage darstellen. Die AutoTextEntries-Auflistung enthält alle Einträge auf der Registerkarte AutoText im Dialogfeld AutoKorrektur.
Hinweise
Verwenden Sie die AutoTextEntries-Eigenschaft , um die AutoTextEntries-Auflistung zurückzugeben. Im folgenden Beispiel wird ermittelt, ob sich ein AutoTextEntry-Objekt mit dem Namen "test" in der AutoTextEntries-Auflistung befindet.
For Each i In NormalTemplate.AutoTextEntries
If LCase(i.Name) = "test" Then MsgBox "AutoText entry exists"
Next i
Verwenden Sie die Add-Methode , um der AutoTextEntries-Auflistung einen AutoText-Eintrag hinzuzufügen. Im folgenden Beispiel wird ein AutoText-Eintrag mit dem Namen "Blue" basierend auf dem Text der Auswahl hinzugefügt.
NormalTemplate.AutoTextEntries.Add Name:="Blue", _
Range:=Selection.Range
Verwenden Sie AutoTextEntries (Index), wobei index der Name oder die Indexnummer des AutoText-Eintrags ist, um ein einzelnes AutoTextEntry-Objekt zurückzugeben. Sie müssen genau der Schreibweise (aber nicht unbedingt der Groß-/Kleinschreibung) des Namens entsprechen, wie sie auf der Registerkarte AutoText im Dialogfeld AutoKorrektur angezeigt wird. Im folgenden Beispiel wird der Wert eines vorhandenen AutoText-Eintrags mit dem Namen "cName" festgelegt.
NormalTemplate.AutoTextEntries("cName").Value = _
"The Johnson Company"
Im folgenden Beispiel werden Name und Wert des ersten AutoText-Eintrags in der mit dem aktiven Dokument verbundenen Vorlage angezeigt.
Set myTemplate = ActiveDocument.AttachedTemplate
MsgBox "Name = " & myTemplate.AutoTextEntries(1).Name & vbCr _
& "Value " & myTemplate.AutoTextEntries(1).Value
Methoden
Eigenschaften
Siehe auch
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.