Mega Code Archive

 

Categories / VisualBasic Script / Powerpoint

 

Design Template

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