剪切、复制、移动、克隆和删除幻灯片

使用slide对象的Cut方法将幻灯片剪切到剪贴板。

使用slide对象的Copy方法将幻灯片复制到剪贴板。

使用slide对象的Paste方法将幻灯片粘贴到Index参数指定的幻灯片前面。

使用slide对象的MoveTo方法将幻灯片移动到集合中指定位置，并重新排列索引号。

使用slide对象的Duplicate方法克隆幻灯片，创建副本并添加到集合。

使用slide对象的Delete方法删除幻灯片。

下面的代码复制和移动幻灯片。

code.vba 
Sub Test()
  Dim pr As Presentation
  Set pr = Presentations.Open("D:\test.pptx")
  Dim sld As Slide
  Set sld = pr.Slides(2)
  sld.Copy
  pr.Slides.Paste 4
End Sub
Sub Test2()
  Dim pr As Presentation
  Set pr = Presentations.Open("D:\test.pptx")
  Dim sld As Slide
  Set sld = pr.Slides(2)
  sld.MoveTo 4
End Sub