topic Re: Exporting to ppt in QlikView

Exporting to ppt

pauldamen — Fri, 09 Mar 2012 14:49:33 GMT

Dear all,

I am looking for a macro to export objects to ppt.

What I need is to be able to select different objects accross different slides and copy them to fixed positions in an existing ppt. So for example object CH01 needs to be intergrated in slide 4 of an existing ppt.

Can some one help me with this macro, I did found general macro's to copy whole sheets but not as specific as I need it.

Regards,

Paul

Exporting to ppt

jagan — Sat, 10 Mar 2012 05:59:51 GMT

Hi,

Check this URLs

http://community.qlik.com/message/56776#56776

http://community.qlik.com/message/194325#194325

Hope it helps you.

Regards,

Jagan.

Re: Exporting to ppt

pauldamen — Mon, 12 Mar 2012 08:32:03 GMT

Thanks for the reply

I found those links as well but I just can't get them to work for me. Copying whole sheets is no problem but I need to be able to copy specific images.

I attached a dressed down version of my application, hope you can help me.

Regards,

Paul

Re: Exporting to ppt

Tue, 02 Apr 2013 10:26:09 GMT

Hi Pauldamen,

Can you share the code or the process that you are following for exporting QD sheet to PowerPoint. Thanks.

Re: Exporting to ppt

Mon, 08 Jul 2013 04:56:33 GMT

Try this macro

Sub Export2PPT_IndividualCharts

Set PPApp = CreateObject("Powerpoint.Application")

PPApp.Visible = True ' Create a presentation

Set PPPres = PPApp.Presentations.Add

Set PPSlide = PPPres.Slides.Add(1, 1)

PPSlide.Shapes(1).Delete ' removes the title

PPSlide.Shapes(1).Delete ' removes the text box

ActiveDocument.GetSheetObject("CH198").CopyBitmapToClipboard

ActiveDocument.GetApplication.WaitForIdle

with PPSlide.Shapes.Paste

.Left = 150

.Top = 50

.Width = 150

.Height = 450

end with

PPPres.SaveAs "C:\Individual.ppt" 'comment this if you dont want ppt to close automatically

PPPres.Close 'comment this if you dont want ppt to close automatically

PPApp.Quit 'comment this if you dont want ppt to close automatically

Set PPSlide = Nothing

Set PPPres = Nothing

Set PPApp = Nothing

End Sub

You may have to change the values .Left, .Top, .Width, .Height. I tried the above values then check in ppt and alter the values again.

Re: Exporting to ppt

vinicius_siquei — Wed, 09 Oct 2013 14:16:10 GMT

Guys I´m trying to use this script, however I´m getting expected object error message for the lines:

.Left = 150

.Top = 50

.Width = 150

.Height = 450

Any idea of how to solve that ?

Re: Exporting to ppt

Wed, 15 Jan 2014 01:33:44 GMT

Sorry for the late reply.

I think the actual error is coming from this line:
"with PPSlide.Shapes.Paste"
because .Left ... .Top has got nothing in it to throw an error... Its just setting the co-ordinates.

Anyways, did u manage to solve it ?

Re: Exporting to ppt

vijetas42 — Thu, 20 Mar 2014 12:32:35 GMT

I have tried above code but, I am getting error ,

ActiveX component can't create object: 'Powerpoint.Application'

Re: Exporting to ppt

jagan — Fri, 21 Mar 2014 01:53:26 GMT

Hi,

Do you Powerpoint installed in your machine??

Regards,

jagan.

Re: Exporting to ppt

Wed, 17 Sep 2014 07:21:03 GMT

Hi Jagan,

The linkages are longer valid. Do you know other link(s) i can learn about Exporting to PPT.

Thank you very much!

Zhou

Re: Exporting to ppt

ashfaq_haseeb — Wed, 17 Sep 2014 07:25:08 GMT

Hi,

Check this.

http://community.qlik.com/message/609224#609224

Regards

ASHFAQ

Re: Re: Exporting to ppt

Wed, 17 Sep 2014 09:11:01 GMT

Hi Ashfaq,

Thank you very much. That is very useful for me.

I have another question:

How to control the size of images which we copy to PPT?

I have tried using below script in Macro:

with PPSlide.Shapes.Paste

.Width=448

.Height=288

end with

But the actual sizes in PPT are different from what i set. Attach is the file i used.