本示例显示当前演示文稿的模板名称。

MsgBox Application.ActivePresentation.TemplateName