Select Method Example

This example selects shapes one and three on slide one in the active presentation.

ActivePresentation.Slides(1).Shapes.Range(Array(1, 3)).Select

This example adds shapes two and four on slide one in the active presentation to the previous selection.

ActivePresentation.Slides(1).Shapes.Range(Array(2, 4)).Select False

This example selects the first five characters in the title of slide one in the active presentation.

ActivePresentation.Slides(1).Shapes.Title.TextFrame _
    .TextRange.Characters(1, 5).Select

This example selects slide one in the active presentation.

ActivePresentation.Slides(1).Select

This example selects a table that has been added to a new slide in a new presentation. The table has three rows and three columns.

With Presentations.Add.Slides
    .Add(1, ppLayoutBlank).Shapes.AddTable(3, 3).Select
End With