Powerpoint VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Powerpoint
  4. Presentation for Review
Sub save()
    ActivePresentation.SaveAs FileName:="C:\HR.ppt", _
        FileFormat:=ppSaveAsPresForReview, EmbedTrueTypeFonts:=msoFalse
End Sub