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