本示例显示 Templates 集合中每个模板的名称。
For i = 1 To Templates.Count
MsgBox Templates(i).Name & " is template number " & i
Next i