Discussion :

[ElPibeOro]

Bonjour à tous !

Voici mon problème :

Je dois trouver des solutions permettant de générer des rapports sous différents formats (PDF, PPT, HTML, ...) à partir de QlikView.
J'ai déjà trouvé des solutions telles que Nprinting ou QBI mais ma mission est de trouver d'autres solutions possibles et de les comparer entre elles.

Avez-vous d'autres idées d'applications permettant de générer automatiquement des rapports aux formats cités ?
Et pouvez-vous me donner votre avis sur ces différentes solutions ?

Merci d'avance pour votre aide !

[Invité]

Hey heyyyy my friend

Je ne sais pas si c'est toujours d'actualité, mais j'ai trouvé ça

http://www.qliktips.com/2012/02/prin...pdf-using.html

C'est un script .vbs qu'il faut créer et lancé. Précaution exigé car je n'ai rien testé..

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
Dim QV, ActiveDocument
 
 
set Qv = CreateObject("QlikTech.QlikView")
 
 
QV.OpenDoc Document,"",""
 
set ActiveDocument = Qv.ActiveDocument
ActiveDocument.ClearAll
 
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"
 
    Next
 
 
 
 
 
 
Sub Print_PDF(FieldValue, ReportName, ReportID)
 
 
 
Dim pdfjob
Dim sPDFName
Dim sPDFPath
 
 
 '/// Change the output file name here! ///
 sPDFName = ReportName & " - " & FieldValue
 sPDFPath = "C:\PDFReports"
 
 
 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
        ' in VBScript use WScript.Sleep(20)
    Loop
    pdfjob.cClose
    Set pdfjob = Nothing
 
 
End Sub

[kiki29]

Salut, c'est du VBA pour Acrobat Pro et PDFCreator, peut-être que cela t'aidera.

Il y a Liste des contributions à jour qui permet de naviguer dans le bazar.