expression.NewPresentation
expression Required. An expression that returns one of the objects in the Applies To list.
Example
This example lists a presentation on the New Presentation task pane at the bottom of the last section in the pane.
Sub CreateNewPresentationListItem()
Application.NewPresentation.Add FileName:="C:\Presentation.ppt"
Application.CommandBars("Task Pane").Visible = True
End Sub