AutoTexte neu erstellen

Wie das Einfügen eines bestehenden AutoTextes, ist auch das Erstellen recht einfach gehalten. Der aufgezeichnete Code besteht nur aus einer Zeile mit zwei Parametern:

001
002
003
004
005
006
007
008
009
010
011

Sub Autotext_neu_anlegen()
    '
    ' Autotext_neu_anlegen Makro
    ' Makro aufgezeichnet am xx.xx.2008 von www.vba-wordwelt.de
    '
   NormalTemplate.AutoTextEntries.Add Name:="VBA-Autotext", _
            Range:=Selection.Range

End Sub

Hier wurde ein AutoText mit dem Namen VBA-Autotext aus dem markierten Text im Dokument erzeugt. Die Markierung wird mit dem Range-Objekt Selection.Range angegeben.

Der AutoText wird in diesem Fall in der Normal.dot gespeichert.

Der aufgezeichnete Code bezieht sich auf das Menü Einfügen | Autotext | Neu... bzw. die Tastenkombination Alt+F3.

zurück zur Übersicht Autotexte