1.can any one provide me the script to create power point application with BLANK slide.

2.Once, that slide is open, i want to save to local drive.

I am using below funtion code, but it create ppt application, but don't open BLANK slide and when it comes to SAVEAS, it says object doesnot support this property or method 'objPPT.Presentations.SaveAs'

Public Function CreatePowerpoint()

Set objPPT = CreateObject("PowerPoint.Application")
objPPT.Visible = True

Set objPresentation = objPPT.Presentations.SaveAs("P:\blah.ppt")

End Function