Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Comment réduire la taille d'un fichier pdf enregistré depuis excel

MINIZ

XLDnaute Nouveau
Bonjour,
j'ai créer un petit programme en vba qui m’enregistre une feuille A4 de classeur en pdf. Tout fonctionne sauf que le fichier pdf avoisine les 400ko et que le serveur où je dois upload mon fichier m'autorise 200ko max.
Avez vous une idée?
J'ai essayé en passant par imprimer => imprimante "pdf creator" cela me donne 48Mo sauf que je préfère la solution d'enregistrer sous .pdf car je peux enregistrer et donner le nom que je veux...
Ce petit programme est à destination d'une personne qui ne maîtrise pas l'informatique.

voici mon code pr enregistrer en pdf
VB:
Sub ImprimePDF()
Dim numfacture As Integer
'Enregistre le fichier excel
        ActiveWorkbook.Save
'Imprime en PDF et rajoute le numéro de facture
    Dim fichier As String
    fichier = "D:\Factures\Facture-" & "-" & [F2].Value & ".pdf"
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=fichier, Quality:=xlQualityMinimum, _
        IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
End Sub
 

zebanx

XLDnaute Accro

Re-
Quel code ? Le #29 ?
Celui-là, sur une plage plus longue, il grimpe effectivement relativement vite (suis arrivé à 192KO sur une matrice 12 colonnes et 40 lignes).
Donc dans le cas qui vous occupe, je continuerai à privilégier pdf.creator avec la version indiquée et qui fonctionne bien.

Et n'ayant pas de réponse à la question du "pourquoi le pdf consomme-t-il des octets ?", soit ça a déjà été traité sur le forum (ie : RECHERCHER en haut à droit) ou sinon il faut chercher sur la toile voire poser une question à Microsoft directement.

Encore une fois, je ne suis pas spécialiste. Même si je comprends que les tests de comparaisons sont nécessaires.
(Et là, j'ai été "dosé" )

Bonne soirée.
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…