topic Macro to export sheet to ppt in QlikView

Macro to export sheet to ppt

saurabh5 — Mon, 11 May 2015 14:56:07 GMT

hi All,

i have to export a sheet as an image to ppt and excel, with the length and width specified in the macro using a button object.so that the user would be able to export the image on a click.Does anybody has a pseudo code to do such an operation.

Thanks for the help

Re: Macro to export sheet to ppt

Gysbert_Wassenaar — Wed, 13 May 2015 08:55:04 GMT

Perhaps one of the discussions returned by this search answers your question: https://community.qlik.com/search.jspa?q=macro+sheet+powerpoint

Re: Macro to export sheet to ppt

vinod2086 — Wed, 13 May 2015 09:37:31 GMT

Hi Saurabh,

try this to export to ppt

Sub ExportPPT

ActiveDocument.ActiveSheet.FitZoomToWindow

Set objPPT = CreateObject("PowerPoint.Application")

objPPT.Visible = True

Set objPresentation = objPPT.Presentations.Add

For i = 0 To ActiveDocument.NoOfSheets - 1

' Set MySheet = ActiveDocument.GetSheet(i)

Set PPSlide = objPresentation.Slides.Add(1,11)

' ActiveDocument.ActiveSheet.CopyBitmapToClipboard

ActiveDocument.GetSheetObject("CH03").CopyBitmapToClipboard

PPSlide.Shapes.Paste

ActiveDocument.GetSheetObject("CH04").CopyBitmapToClipboard

PPSlide.Shapes.Paste

Set PPSlide = Nothing

Set PPPres = Nothing

End sub

export to excel

sub ExportToQVD()
path="c:\path\"
set obj1=ActiveDocument.GetSheetObject("Current_PP")
obj1.ExportEX Path&"PP_CURRENT.csv" , 4
end sub