Impression avec pdf creator vba Excel

Résolu/Fermé
PYGOS69 Messages postés 452 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 10 octobre 2023 - Modifié par PYGOS69 le 22/06/2016 à 20:27
GermPeru Messages postés 172 Date d'inscription mercredi 7 décembre 2016 Statut Membre Dernière intervention 27 mars 2018 - 20 mai 2017 à 17:29
Bonjour,

Je souhaite, à partir d'une macro, enregistrer une feuille Excel , au format PDF avec l'imprimante "PDF CREATOR", qui n'est pas l'imprimante par défaut.

Je n'utilise pas le format pdf, proposé par excel, car j'obtiens un fichier pdf de (500ko) alors que si j'utilise l'imprimante pdf créator , le fichier ne fait que 170 ko.

Je précise que cette feuille est utilisée par plusieurs utilisateurs dans une entreprise....

Demande :

à partir d'un bouton (macro), je souhaite que vba enregistre sur le bureau de l'utilisateur un fichier au format pdf, de la feuille active, avec comme nom :

le nom sera toujours : PJ_IJ.pdf

A chaque activation de la macro, vba devra remplacer le fichier existant sur le bureau, si un fichier existe déjà.......

Merci d'avance pour votre aide.....

1 réponse

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
23 juin 2016 à 14:03
Bonjour,

Petit probleme avec PDFCreator, plus possible de donner le chemin pour les fichier par programmation, il faudrait donc definir dans les parametres de profil le chemin par defaut. Pour le reste, selection PDFcreator pour sauvegarde fichier et remettre l'imprimante de depart ca ne pose aucun probleme

0
PYGOS69 Messages postés 452 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 10 octobre 2023 21
Modifié par PYGOS69 le 23/06/2016 à 17:59
Bonjour,

Merci, mais je recherche une macro pouvant réaliser tout ceci......

Cordialement,
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701 > PYGOS69 Messages postés 452 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 10 octobre 2023
23 juin 2016 à 18:35
Re,

Demain, je vous ferai ca
0
PYGOS69 Messages postés 452 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 10 octobre 2023 21 > f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024
23 juin 2016 à 19:17
Merci !
0
f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701 > PYGOS69 Messages postés 452 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 10 octobre 2023
Modifié par f894009 le 24/06/2016 à 07:58
Bonjour,

fichier impression feuille active en PDF par PDFCreator:

Vous aurez a parametrer PDFCreator pour chaque PC, voir image dans fichier
Le chemin du bureau est trouve automatiquement dans le code pour les manips fichiers
Actuellement il y a des boites a messages qui s'affichent, a enlever une fois que c'est ok

https://www.cjoint.com/c/FFyf14ntQ6f


A+
0
PYGOS69 Messages postés 452 Date d'inscription jeudi 23 août 2012 Statut Membre Dernière intervention 10 octobre 2023 21 > f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024
Modifié par PYGOS69 le 24/06/2016 à 08:50
Bonjour,

Merci, mais je n'arrive pas à ouvrir le fichier......une nouvelle fenêtre s'ouvre avec caractères illisibles...

PK�����!��(&Q���|���[Content_Types].xml �(�����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������U�n�0��?�"�����C�&@�X�k�1E�Ʊ��K��#p�Ћ^��������w�
0