assigns to the SlideRange object variable mySlideRange the slides named Intro and Outro in the active presentation:
Sub rangeArray() Set mySlideRange = ActivePresentation.Slides.Range(Array("Intro", "Outro")) End Sub