Powerpoint VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Powerpoint
  4. Add slides
Sub CreatePresentations()
     Dim intPresentations As Integer
     Dim i As Integer
     intPresentations = 3
     For i = 1 To intPresentations
         Presentations.Add
     Next i
 End Sub