Applies the design template named Disaster.pot to a range of slides consisting of the first, fourth, and sixth slides in the active presentation : Slide Tempalte « PowerPoint « VBA / Excel / Access / Word






Applies the design template named Disaster.pot to a range of slides consisting of the first, fourth, and sixth slides in the active presentation

 
Sub range()
    ActivePresentation.Slides.Range(Array(1, 4, 6)).ApplyTemplate _
        FileName:="C:\Your.pot"
End Sub

 








Related examples in the same category

1.Applying a Template to a Presentation, to a Slide, or to a Range of Slides
2.Apply the design template named Mountain Top.pot to the first slide in the presentation named Success.ppt: