Finding a Slide by Its ID Number : Slide Edit « PowerPoint « VBA / Excel / Access / Word






Finding a Slide by Its ID Number

 
Sub addFromFile()
    Dim TargetSlide As Long
    TargetSlide = ActivePresentation.Slides.Add(Index:=5,    Layout:=ppLayoutFourObjects).SlideID
    Presentations("C.ppt").Slides.InsertFromFile _
        FileName:="C:\A.ppt", Index:=3
    ActivePresentation.Slides.FindBySlideID(TargetSlide).ApplyTemplate _
        FileName:="C:\B.pot"
End Sub

 








Related examples in the same category

1.Inserting Slides from an Existing Presentation
2.Changing the Layout of an Existing Slide
3.Deleting an Existing Slide
4.Copying and Pasting a Slide
5.Duplicating a Slide
6.Moving a Slide
7.Accessing a Slide by Name
8.Working with a Range of Slides
9.assigns to the SlideRange object variable mySlideRange the slides named Intro and Outro in the active presentation: