Mega Code Archive

 
Categories / VisualBasic Script / Powerpoint
 

Copying and Pasting a Slide

Sub copy()     ActivePresentation.Slides(1).Copy     ActivePresentation.Slides.Paste Index:=5 End Sub