NormalTemplate Property Example

This example inserts the AutoText entry named "Test" from the Normal template, if this entry is contained in the AutoTextEntries collection.

For Each entry In NormalTemplate.AutoTextEntries
    If entry.Name = "Test" Then entry.Insert Where:=Selection.Range
Next entry

This example saves the Normal template if changes have been made to it.

If NormalTemplate.Saved = False Then NormalTemplate.Save