topic Re: Applying a template in a macro for PowerPoint in QlikView

Applying a template in a macro for PowerPoint

Anonymous — Wed, 16 Jan 2013 07:10:00 GMT

I cannot get the Apply Template to work. Any ideal what I am doing wrong?

sub ExportToPowerPoint
'Create ppt object
Set objPPT = CreateObject("PowerPoint.Application")
objPPT.Visible = True

Set objPresentation = objPPT.Presentations.Add

'Apply a template if you want one
objPresentation.ApplyTemplate _
("C:\SampleTemplate.potx")

' Create Slides
' Same Slide - 2nd Slide
Set PPSlide = objPresentation.Slides.Add(1,1)
ActiveDocument.GetSheetObject("Slide2").CopyBitmapToClipboard
PPSlide.Shapes.Paste

end sub

Re: Applying a template in a macro for PowerPoint

Wed, 20 Feb 2013 12:42:21 GMT

Has anybody found a resolution to this issue with applying an existing template - I have been running into the same error myself

Any help would be grealy apprecaited.

Re: Applying a template in a macro for PowerPoint

Gysbert_Wassenaar — Wed, 20 Feb 2013 18:18:08 GMT

This page indicates you don't use parentheses around the template file name. If that doesn't help you, ask somewhere where they specialize in ms-office scripting. You'll have a better chance of an answer in such a place.

Re: Applying a template in a macro for PowerPoint

Thu, 21 Feb 2013 09:23:36 GMT

Thanks the parentheses don't seem to do it but you've definately pointed me in the correct direction with respect to looking more into ms-office resources. There's a lot more information around this on those pages. I'll let you know of the outcome!

Re: Applying a template in a macro for PowerPoint

Thu, 21 Feb 2013 11:10:00 GMT

this works for me - simple enough solution in the end !

objPresentation.ApplyTemplate("C:\Documents and Settings\mytemplate.pot")