![]() Choose PDF (*.pdf) from the Save as type drop-down menu.The fastest way to convert your presentation to PDF is to use the “Save As” option: This way you will have an opportunity to edit the original material later. How to convert PPT to PDF using PowerPointīefore converting a presentation to a PDF file, we recommend saving it as a PPT or PPTX file. This article explains how to convert a PowerPoint presentation to a PDF file and also how to share a presentation without sacrificing interactivity. High-resolution PDFs are ideal for sharing and printing static slides that have no multimedia or animation effects. ObjPresentation.ExportAsFixedFormat curDir & curFile.Name & ".pdf", ppFixedFormatTypePDF, ppFixedFormatIntentScreen, msoTrue, ppPrintHandoutHorizontalFirst, ppPrintOutputSlides, msoFalse, objPrintOptions.If you want to make your PowerPoint presentation universal, printer-friendly and compact, then converting it to PDF may be a good idea. WriteLine "You need to specify input files." Used this to write a script for converting a whole folder, please reply if this can be improved this is my first time writing vbscript! command: cscript scriptname.vbs "C:/path/to/folder"įiles will be saved in the directory the script is in. ObjPresentation.ExportAsFixedFormat outputFile, ppFixedFormatTypePDF, ppFixedFormatIntentScreen, msoTrue, ppPrintHandoutHorizontalFirst, ppPrintOutputSlides, msoFalse, objPrintOptions.Ranges(1), ppPrintAll, "Slideshow Name", False, False, False, False, False Set objPrintOptions = objPresentation.PrintOptions Set objPresentation = objPPT.ActivePresentation ![]() Set objPPT = CreateObject( "PowerPoint.Application" ) WriteLine "Your output file (' & outputFile & ') already exists!" WriteLine "Unable to find your input file " & inputFile If Not objFso.FileExists( inputFile ) Then Set objFso = CreateObject("Scripting.FileSystemObject") WriteLine "You need to specify input and output files." ![]() Option ExplicitĬonst ppFixedFormatIntentScreen = 1 ' Intent is to view exported file on screen.Ĭonst ppFixedFormatIntentPrint = 2 ' Intent is to print exported file.Ĭonst ppFixedFormatTypeXPS = 1 ' XPS formatĬonst ppFixedFormatTypePDF = 2 ' PDF formatĬonst ppPrintHandoutVerticalFirst = 1 ' Slides are ordered vertically, with the first slide in the upper-left corner and the second slide below it.Ĭonst ppPrintHandoutHorizontalFirst = 2 ' Slides are ordered horizontally, with the first slide in the upper-left corner and the second slide to the right of it.Ĭonst ppPrintOutputTwoSlideHandouts = 2 ' Two Slide HandoutsĬonst ppPrintOutputThreeSlideHandouts = 3 ' Three Slide HandoutsĬonst ppPrintOutputSixSlideHandouts = 4 ' Six Slide HandoutsĬonst ppPrintOutputNotesPages = 5 ' Notes PagesĬonst ppPrintOutputBuildSlides = 7 ' Build SlidesĬonst ppPrintOutputFourSlideHandouts = 8 ' Four Slide HandoutsĬonst ppPrintOutputNineSlideHandouts = 9 ' Nine Slide HandoutsĬonst ppPrintOutputOneSlideHandouts = 10 ' Single Slide HandoutsĬonst ppPrintAll = 1 ' Print all slides in the presentation.Ĭonst ppPrintSelection = 2 ' Print a selection of slides.Ĭonst ppPrintCurrent = 3 ' Print the current slide from the presentation.Ĭonst ppPrintSlideRange = 4 ' Print a range of slides.Ĭonst ppPrintNamedSlideShow = 5 ' Print a named slideshow.Ĭonst ppShowNamedSlideShow = 3 ' Show named slideshow.Ĭonst ppShowSlideRange = 2 ' Show slide range. I've included links inline for references to the various bits.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |