VBA Imprimer avec PDFCREATOR v2.52

Bonjour,

J'avais une feuille excel pour faire les quittances de loyer.

Cette feuille était imprimé via PDFCreator pour un envoi par email.

pour m'amuser, j'ai créer des boutons pour copier la quittance N-1 en N, corrections du mois, de la date, du numéro... puis un bouton pour imprimer en PDF avec l'outil de Microsoft et un bouton pour envoi mail direct du PDF.

Les fichiers font plus de 500 ko alors qu'avec PDFCreator, j'avais des fichiers de 70 / 80 ko.

Mon code est le suivant :

Sub CommandButton3_Click()
'Création PDF

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=ActiveWorkbook.Path & "\Quittance n°" & Range("B3") & " Mme XX XXXX.pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True

End Sub

Et en Noir et Blanc si possible

Comment l'ajuster pour passer avec PDFCreator ?

Merci

Bonjour,

avez-vous essayé avec Quality:=xlQualityMinimum ?

Et bien non, j'avais récupéré le code sur internet sans m'intéresser à ce point

Après test, toujours 540 ko environ. donc pas de gain ou minime.

Merci pour la suggestion