Adapt VBA to save selected slides to a default folder with the original file name

[John Wilson]

This is off the top of head and totally untested but you should be able to add before End Sub

call NewPPT.SaveCopyAs ("C:\MyFolder " & OldPPT.Name)