Mega Code Archive

 
Categories / VisualBasic Script / Powerpoint
 

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