The highest quality PowerPoint Templates and Keynote Templates download

If you need to create a handout programmaticaly in PowerPoint using VBA, then this code snippet can be handy.

Sub CreateHandout()
ActivePresentation.ExportAsFixedFormat "c:/pdf/" + Replace(ActivePresentation.name, "pptx", "pdf"), ppFixedFormatTypePDF, ppFixedFormatIntentPrint, msoCTrue, ppPrintHandoutHorizontalFirst, ppPrintOutputFourSlideHandouts, msoFalse, , , , False, False, False, False, False
End Sub