Restores a previously deleted placeholder on a slide. Returns a Shape object that represents the restored placeholder.
If more than one placeholder of a specified type has been deleted from the slide, the AddPlaceholder method will add them back to the slide, one by one, starting with the placeholder that has the lowest original index number.
Dim shpAddPlaceholder As Shape Set shpAddPlaceholder = ActiveWindow.Selection.SlideRange(1).Shapes.AddPlaceholder(Type:=ppPlaceholderBitmap)
The following argument is required
(PpPlaceholderType) - The type of placeholder. Placeholders of type ppPlaceholderVerticalBody or ppPlaceholderVerticalTitle are found only on slides of layout type ppLayoutVerticalText, ppLayoutClipArtAndVerticalText, ppLayoutVerticalTitleAndText, or ppLayoutVerticalTitleAndTextOverChart. You cannot create slides with any of these layouts from the user interface; you must create them programmatically by using the Add method or by setting the Layout property of an existing slide.
Here you can find possible values for
The following arguments are optional