Shapes.AddTitle (PowerPoint)

Restores a previously deleted title placeholder to a slide. Returns a Shape object that represents the restored title.

This method will cause an error if you haven't previously deleted the title placeholder from the specified slide. Use the HasTitle property to determine whether the title placeholder has been deleted.

Dim shpAddTitle As Shape
Set shpAddTitle = ActiveWindow.Selection.SlideRange(1).Shapes.AddTitle()