VB code that Opens a powerpoint, savesAs and closes the ppt

Hi All,
Ive been working on and mutilating code I've sourced from various places on the web. I cant seem to get the save as feature right. Appreciate any help.
The error message I am getting is : "run time error "438". object doesnt support this property or method"

Please Login or Register  to view this content.

I am getting the error in this line

Please Login or Register  to view this content.

You will need to enable Microsoft Powerpoint xx.0 Object library under Tools-> References