shamsam1
09-20-2008, 03:09 AM
Hi
The following code will open powerpoint template. But when I press save the file saving in the default location. Though a template it is not displaying save as dialog box. But if I open same .pot file without code, it is displaying save as dialog box when I press save. Can anyone tell me how to open a power point template and save as concept
Dim ppt As Object
Set ppt = CreateObject("PowerPoint.Application")
ppt.Visible = True
ppt.Presentations.Open "C:\test.pot"
Set ppt = Nothing
The following code will open powerpoint template. But when I press save the file saving in the default location. Though a template it is not displaying save as dialog box. But if I open same .pot file without code, it is displaying save as dialog box when I press save. Can anyone tell me how to open a power point template and save as concept
Dim ppt As Object
Set ppt = CreateObject("PowerPoint.Application")
ppt.Visible = True
ppt.Presentations.Open "C:\test.pot"
Set ppt = Nothing