Mega Code Archive

 
Categories / VisualBasic Script / Powerpoint
 

Saves the presentation

Sub save()     ActivePresentation.SaveAs FileName:="C:\HR.ppt", _         FileFormat:=ppSaveAsPowerPoint7, EmbedTrueTypeFonts:=msoFalse End Sub