Export Method Example

This example saves the active presentation as a PowerPoint presentation and then exports each slide in the presentation as a Portable Network Graphics (PNG) file that will be saved in the Current Work folder. The example also exports each slide to a height of 100 pixels and a width of 100 pixels.

With ActivePresentation
    .SaveAs "c:\current work\Annual Sales", ppSaveAsPresentation
    .Export "c:\current work", "png", 100, 100
End With

This example exports slide three in the active presentation to disk in the JPEG graphic format. The slide is saved as "Slide 3 of Annual Sales.jpg."

With Application.ActivePresentation.Slides(3)
    .Export "c:\my documents\Graphic Format\" & _
        "Slide 3 of Annual Sales", "JPG"
End With