[PowerPoint] VBAでPDF変換する方法(PPT to PDF)

Dim prng As PrintRange
ActivePresentation.PrintOptions.Ranges.ClearAll
Set prng = ActivePresentation.PrintOptions.Ranges.Add(1, 3)
'1～3ページを指定（スライド数が指定よりも少ない場合はエラー）

ActivePresentation.ExportAsFixedFormat "C:hogehoge.pdf", _
ppFixedFormatTypePDF, , , , , , prng, ppPrintSlideRange, , , , , , False