Bonjour,
Je voulais au départ écrire une macro qui imprime une zone de cellules d'un fichier calc. J'ai essayé la routine ImprimerZones que propose le livre de Marcelly & Godard ( avec différentes imprimantes : la mienne et PDFcreator) : bilan : rien ne sort : ni papier ni lancement de PDFCreator.
J'ai alors essayé l'export PDF toujours proposé par ce meme livre :
J'ai deux pbs : - cette macro me sort bien un docu PDF maisje n'ai pas la main sur les feuilles et zones choisies ( meme en changeant en manuel la zone d'impression ???)
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 Public Const leDoc ="D:\docA.ods" Sub ConversionPDF() Dim monDocument As Object Dim adresseDoc As String Dim propFich(0) As New com.sun.star.beans.PropertyValue adresseDoc = convertToURL(leDoc) monDocument = StarDesktop.LoadComponentFromURL(_ adresseDoc, "_blank", 0, propFich) propFich(0).Name = "FilterName" propFich(0).Value = "calc_pdf_Export" adresseDoc = convertToURL("D:\docB.pdf") monDocument.storeToURL(adresseDoc, propFich()) on Error Resume Next monDocument.close(True) On Error GoTo 0 End Sub
- peut-on convertir en pdf une zone de cellules d'une page précise ( dynamiquement par une macro ) ?
Merci ( je patauge depuis longtemps ...)
Partager