topic Re: Macro to export sheet to PDF in QlikView

Macro to export sheet to PDF

Mon, 06 Jan 2014 06:26:59 GMT

Hi,

I want to export sheet to PDF format and save it as pdf file.

Like, i want to have snapshot of whole sheet and save it as PDF.

Is there any macro to achieve this functionality?

Re: Macro to export sheet to PDF

sujeetsingh — Mon, 06 Jan 2014 06:33:59 GMT

Go to this link

Macro to export AND mail report as PDF | QlikCommunity

http://community.qlik.com/thread/74053

Re: Macro to export sheet to PDF

vikasmahajan — Mon, 06 Jan 2014 06:58:17 GMT

HOPE THIS HELP YOU

VIKAS

Re: Macro to export sheet to PDF

Mon, 06 Jan 2014 06:58:59 GMT

HI Uday ,

Try This ..

Sub PrintReport()

ActiveDocument.ClearAll

Dim FieldName

FieldName = "Country"

Dim mySelections

set mySelections = _

ActiveDocument.Fields(FieldName).GetPossibleValues

Dim i

for i = 0 to mySelections.Count - 1

Dim FieldValue

FieldValue = mySelections.Item(i).text

ActiveDocument.Fields(FieldName).Select FieldValue

Print_PDF FieldValue, "My Report", "RP01"

End Sub

Sub Print_PDF(FieldValue, ReportName, ReportID)

' This is mostly reference code from the

' PDF Creator documentation

' Designed for early bind, set reference to PDFCreator

Dim pdfjob

Dim sPDFName

Dim sPDFPath

'/// Change the output file name here! ///

sPDFName = ReportName & " - " & FieldValue

sPDFPath = "C:\Temp"

Set pdfjob = CreateObject("PDFCreator.clsPDFCreator")

With pdfjob

If .cStart("/NoProcessingAtStartup") = False Then

If .cStart("/NoProcessingAtStartup", True) = _

False Then

Exit Sub

End if

.cVisible = True

End If

.cOption("UseAutosave") = 1

.cOption("UseAutosaveDirectory") = 1

.cOption("AutosaveDirectory") = sPDFPath

.cOption("AutosaveFilename") = sPDFName

.cOption("AutosaveFormat") = 0 ' 0 = PDF

.cClearCache

End With

' Print the QlikView Report

ActiveDocument.PrintReport ReportID, "PDFCreator"

' Wait until the print job has entered the print queue

Do Until pdfjob.cCountOfPrintjobs = 1

ActiveDocument.GetApplication.Sleep 20

' in VBScript use WScript.Sleep(20)

Loop

pdfjob.cPrinterStop = False

' Wait until PDF creator is finished

' then release the objects

Do Until pdfjob.cCountOfPrintjobs = 0

ActiveDocument.GetApplication.Sleep 20

Loop

pdfjob.cClose

Set pdfjob = Nothing

End Sub

Hope It Helps

Re: Macro to export sheet to PDF

vikasmahajan — Mon, 06 Jan 2014 07:32:56 GMT

You need to install free PDF BULLZIP

Vikas

Re: Macro to export sheet to PDF

VishalWaghole — Mon, 06 Jan 2014 08:01:27 GMT

Hi Uday,

Hope this link make help for you.

http://community.qlik.com/thread/102666

- Regards

Vishal Waghole.