Klasse AutoTextEntries (Word VBA)
Eine Auflistung von AutoCorrectEntry -Objekten, die die AutoText-Einträge in einer Vorlage darstellen. Um eine AutoTextEntries -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise
Add
Gibt ein AutoTextEntry -Objekt zurück, das einen AutoText-Eintrag darstellt, der der Liste der verfügbaren AutoText-Einträge hinzugefügt wurde.
Sub AutoTxt()
NormalTemplate.AutoTextEntries.Add Name:="Sample Text", _
Range:=Selection.Range
End Sub
Arguments
Hier sind die benannte Argumente :
Name (String) - Der Text, der bei der Eingabe einen AutoText-Eintrag auslöst.
Range (Range) - Ein Textbereich, der automatisch bei der Eingabe von Name einfügt wird.
AppendToSpike
Löscht den angegebenen Bereich und nimmt den Inhalt des Bereichs in die Auflistung auf (einen integrierten AutoText-Eintrag).
Die AppendToSpike -Methode ist nur für die AutoTextEntries -Auflistung in der Vorlage Normal gültig.
AppendToSpike (Range)
Range: Der Bereich, der gelöscht und an die Auflistung angehängt wird.
If Len(Selection.Range.Text) > 1 Then
NormalTemplate.AutoTextEntries.AppendToSpike _
Range:=Selection.Range
End If
Count
Gibt die Anzahl der Elemente in der AutoTextEntries -Auflistung zurück.
Dim ates As AutoTextEntries: Set ates =
Dim lngCount As Long
lngCount = ates.Count
Item
Gibt ein einzelnes AutoTextEntry -Objekt in einer Auflistung zurück.
Item (Index)
Index: Das einzelne Objekt zurückgegeben werden soll.
Dim ates As AutoTextEntries: Set ates =
Dim ate As AutoTextEntry
Set ate = ates(Index:=1)