Modifier la qualité d'impression a partir de vba

Bonjour,

 

J'utilise uneversion modifiée de la macvro complementaire XLS2PDF de (http://www.veriti.net) pour générer un PDF consolidé  d'une selection d'onglets excel . Le PDF est bien généré.

Par contre,certaines pages sont tronquées parce que PDFCreator prend par défaut la qualité d'impression maximale. Pour régler ce problème, il faut que je puisse configurer ce parametre avec une valeur inférieure sous VBA.

J'ai utilisé l'option " PDFGeneralResolution" mais sans succés

  Set cPDF = CreateObject("PDFCreator.clsPDFCreator")
  With cPDF
   .cOption("AutosaveFormat") = 0                            ' 0 = PDF
    .cOption("PDFGeneralResolution") = 600
   .cClearCache
endwith

Ce ne doit pas être la bonne. Le paramettre correspond à l'option "qualité d'ilmpression" que l'on peut configurer en utilisant le mode avancé lorsque l'on utilise l'imprimante pdfCreator en direct.

Avez-vous une réponse à ce problème

 

Merci bien et bonne année  en avance.

mister red