Application.Templates (Word)
Gibt eine Templates -Auflistung zurück, die alle verfügbaren Vorlagen darstellt: globale Vorlagen und mit geöffneten Dokumenten verknüpfte Vorlagen.
Informationen zum Zurückgeben eines einzelnen Elements einer Auflistung finden Sie unter zurückgeben eines Objekts aus einer Auflistung.
Count = 1
For Each aTemplate In Templates
MsgBox aTemplate.Name & " is template number " & Count
Count = Count + 1
Next aTemplate