将以前已删除的标题占位符恢复到幻灯片上。返回一个代表已恢复标题的 Shape 对象。
注意 如果未曾从指定幻灯片删除标题占位符,该方法将导致出错。请使用 HasTitle 属性确定是否已删除标题占位符。
expression.AddTitle
expression 必选。该表达式返回一个 Shapes 对象。
如果此标题占位符已删除,本示例将其恢复到活动演示文稿第一张幻灯片。恢复后的标题文本为“Restored title”。
With ActivePresentation.Slides(1)
If .Layout <> ppLayoutBlank Then
With .Shapes
If Not .HasTitle Then
.AddTitle.TextFrame.TextRange _
.Text = "Restored title"
End If
End With
End If
End With