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

Leave a Reply

Your email address will not be published. Required fields are marked *

Translate »