Application.NormalTemplate (Word)

Devuelve un objeto Template que representa la plantilla normal.

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