Macro for send to ppt

[vipin_mishra479]

how to send each sheet of dashboard to different slide of ppt

[m_woolf]

You might reply to this post and ask for his macro:

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

[#3]

Set PPApp = CreateObject("Powerpoint.Application")

PPApp.Visible = True ' Create a presentation

Set PPPres = PPApp.Presentations.Add

Set PPSlide = PPPres.Slides.Add(1, 1)
ActiveDocument.GetSheetObject("CH15").CopyBitmapToClipboard
PPSlide.Shapes.Paste

PPPres.SaveAs "E:\Qlikview\Prima\PPT\Presentation.ppt"
PPPres.Close
PPApp.Quit

Set PPSlide = Nothing
Set PPPres = Nothing
Set PPApp = Nothing