Powerpoint VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Powerpoint
  4. Show slides 4 through 8 in the presentation
Sub settings()
    With Presentations("Corporate.ppt").SlideShowSettings
        .RangeType = ppShowSlideRange
        .StartingSlide = 4
        .EndingSlide = 8
        .Run
    End With
End Sub