Excel vers pdf

[cyrus55160]

Bonjour,

est il possible par vba de transformer un fichier excel en pdf?
Actuellement je clique sur l'icone adobe présent dans la barre des taches et je voudrais automatiser cela.
La version d'excel que j'utilise est excel 2002.

Merci

 

[chris]

Re : Excel vers pdf

Bonjour
Pour faire un pdf il faut imprimer vers l'imprimante pdf.
La macro peut lancer cette impression.
Le PB est le nom de l'imprimante pdf qui peut varier d'un PC à un autre : soit il faut que ce soit l'imprimante par défaut, soit il faut connaître son port Windows.

 

[Catrice]

Re : Excel vers pdf

Bonjour,

J'utilise CutePDF.
Avec le code suivant je peux imprimer en PDF.
Le SendKeys est executé qqs secondes plus tard (il faut attendre que la boite de dialogue apparaisse).
Il faudrait gerer le fait que le fichier toto.pdf n'existe pas déjà.
Ca, ça peut etre fait en macro Excel classique.

Sub Test1()
'Affiche la boite de dialogue d'impression.
Application.OnTime Now + TimeValue("00:00:03"), "Test2"
ActiveWindow.SelectedSheets.PrintOut ActivePrinter:="CutePDF Writer sur CPW2:"
End Sub

Sub Test2()
'Sert à saisir le nom de fichier et à valider ENTRER
SendKeys "toto.pdf {ENTER}"
End Sub


Voir fichier joint.

 

[didus]

Re : Excel vers pdf

Salut,

en gratuit tu as aussi pdfcreator qui fonctionne de la même maniére et peut être inclus dans une macro sans soucis.

cordialement

 

[criscris11]

Re : Excel vers pdf

Bonsoir le forum, le fil,
Il existe également une autre alternative gratuite avec open office : il suffit d'ouvrir ton fichier excel avec Calc d'open office et de l'exporter tout simplement en fichier pdf.
Si tu veux plus d'info, n'hésites-pas.
Bonne soirée à tous.

 

[cyrus55160]

Re : Excel vers pdf

Bonjour et merci à tous,

J'ai essayé la solution de catrice, elle fonctionne mais j'ai une fenêtre qui me demande :"save pdf file as", et il faut que je rentre un nom pour le pdf.
N'est il pas possible par vba de choisir le nom du fichier en faisant référence à une cellule du fichier, sans avoir à effectuer de saisie dans la fenêtre "Save pdf ...."

Merci

 

[TheProdigy]

Re : Excel vers pdf

Bonjour à tous,

J'ai essayé mais jai pas tout à fait compris ta solution Catrice. J'ai executé les 2 macros mais quand j'imprime il ne se tranforme pas en pdf.

Merci à tous

 

[Catrice]

Re : Excel vers pdf

Bonjour,

Ma solution fonctionne avec CutePDF.

Il faut lancer Test1
Elle permet d'enregistrer en PDF, exectute la macro Test2 qui se lance qqs secondes apres pour entrer un nom (toto.pdf) puis valider ENTRER.

En effet, CutePDF affiche une boite de dialogue où il faut saisir qq chose.
Je n'ai pas trouvé d'autre solution avec CutePDF 🙁

Il faut donc copier les 2 macros pour tester.

 

[TheProdigy]

Re : Excel vers pdf

Re Catrice,

Quand j'execute Test1 il y a toto.pdf qui s'écrit dans A1 est ce que je suis dans la bonne voie?

 

[TheProdigy]

Re : Excel vers pdf

Salut criscris11,

Comment ouvrir calc d'Open office?

Merci

 

[cyrus55160]

Re : Excel vers pdf

Bonjour,

Je travaille avec Adobe acrobat (pas le choix c sur le réseau usine);lorsque je lance test1, j'ai la fenêtre d'impresssion qui s'ouvre, puis la fenêtre pour enregistrer le pdf. Mais lorsque la fenetre d'enregistrement est ouverte je ne peux pas lancer Test2 ou d'autres macros.

Merci

 

[TheProdigy]

Re : Excel vers pdf

Mais moi je n'ai aucune fenetre qui s'affiche pourquoi? 🙁

 

[Catrice]

Re : Excel vers pdf

Re,

Adilprodigy,

Il faut que CutePDF soit installé et que son nom soit :
CutePDF Writer sur CPW2:.
Si ce n'est pas le cas, il faut écrire le nom correct ci-dessous :
ActiveWindow.SelectedSheets.PrintOut ActivePrinter:="CutePDF Writer sur CPW2:"

Pour etre sur de l'avoir, tu fais Macro enregistrer et tu regardes le résultat
(C'est pour ça que tu n'as aucune fenetre qui s'affiche)


Cyrus55160,

Tu ne dois pas lancer Test2, elle se lance toute seule.
Avec Adobe acrobat décris moi quelles sont les étapes (complete ci-dessous) :
- Fichier Imprimer
- Choisir Adobe acrobat
- Taper le nom du fichier PDF (tombe t on directement dans la boite de saisie ?)
- Taper sur ENTER

Dans la macro Test1, tu as bien remplacé CutePDF Writer sur CPW2: par ton nom d'imprimante PDF ?

 

[cyrus55160]

Re : Excel vers pdf

Salut,

J'ai changé le nom de l'imprimante qui chez moi est "Adode PDF sur Ne04"
Les étapes sont les suivantes:
- J'éxécute Test 1
- La fenêtre "impression de 'fichier x' sur Adode PDF sur Ne04 s'ouvre
- ensuite la fenêtre "Save pdf file as" s'ouvre
si je ne mets pas de nom de fichier et que je ne valide pas la fenêtre reste ouverte et rien ne se passe.

Les étapes dans adobe sont les suivantes :
- je choisis mon fichier xl à convertir
- je clique sur l'icone adobe pdf
- une fenetre s'ouvre "Adode needs to save the document before continuing.Do you want to save the file?"
- je choisis un nom de fichier et je valide
- la fenetre d'impression adobe pdf s'ouvre "impression de 'fichier x' sur Adode PDF sur Ne04"
- enfin adobe acrobat s'ouvre avec mon document pdf.


Merci

merci

 

[Catrice]

Re : Excel vers pdf

Re,

Essaye en modifiant :
TimeValue("00:00:03") en TimeValue("00:00:08")

MAIS, question importante.
Quand la fenetre où on doit saisir le nom du fichier apparait, où se trouve t on ?
Est on dans la zone où il faut saisir le nom de fichier ?

En d'autres termes, manuellement, faire Fichier imprimer (PDF).
Saisit on directement le nom de fichier puis ENTRER ?
ou
Doit on se positionner dans une case, saisir le nom puis ENTRER ?