Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Comment imprimer un fichier pdf et refermer acrobat reader

Comment imprimer un fichier pdf et refermer acrobat reader

3 réponses
Avatar
Nico
Bonjour à vous tous,

Je travaille sur une "petite" macro qui doit à un moment donné imprimer un
fichier pdf stocké sur mon disque en toute transparence pour l'utilisateur.
C'est à dire que la macro ouvre le fichier dans Acrobat Reader, l'imprime et
referme Acrobat Reader.

J'ai le code pour ouvrir ce fichier :
ThisWorkbook.FollowHyperlink "C:\Temp\test.pdf"

Et c'est ensuite que cela se complique :
- je n'arrive pas à lancer l'impression.
j'ai essayé un SendKeys "^P", mais il ne se passe rien
- je n'arrive pas à refermer la fenêtre d'Acrobat Reader

Quelqu'un pourrait-il m'aider ???
(ma version d'Acrobat Reader est la 6.0, et Excel 2000)

Merci par avance.

NICO
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Daniel.j
Il faut faire patienter les applis avec SendKeys:

Application.DisplayAlerts = False
ThisWorkbook.FollowHyperlink "C:Temptest.pdf"
' attends l'ouverture complete d'Acrobat
Application.Wait Now + TimeValue("00:00:04")
'Imprime
SendKeys "^{p}", True
Application.Wait Now + TimeValue("00:00:02")
'lValide l'impression par Entree
Application.SendKeys ("^;{ENTREE}")
Application.Wait Now + TimeValue("00:00:0")
'et quitte
SendKeys "^{q}", True

--
Daniel
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Foire Aux Questions Microsoft Public Fr Excel
FAQ MPFE
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=- Adresse: http://dj.joss.free.fr/faq.htm


"Nico" a écrit dans le message de news:

Bonjour à vous tous,

Je travaille sur une "petite" macro qui doit à un moment donné imprimer un
fichier pdf stocké sur mon disque en toute transparence pour
l'utilisateur.

C'est à dire que la macro ouvre le fichier dans Acrobat Reader, l'imprime
et

referme Acrobat Reader.

J'ai le code pour ouvrir ce fichier :
ThisWorkbook.FollowHyperlink "C:Temptest.pdf"

Et c'est ensuite que cela se complique :
- je n'arrive pas à lancer l'impression.
j'ai essayé un SendKeys "^P", mais il ne se passe rien
- je n'arrive pas à refermer la fenêtre d'Acrobat Reader

Quelqu'un pourrait-il m'aider ???
(ma version d'Acrobat Reader est la 6.0, et Excel 2000)

Merci par avance.

NICO



Avatar
Daniel.j
Manquait un p'tit 2 ici:
Application.Wait Now + TimeValue("00:00:02")

Application.SendKeys ("^;{ENTREE}")
******* Application.Wait Now + TimeValue("00:00:0")*********
'et quitte
SendKeys "^{q}", True
Daniel

"Nico" a écrit dans le message de news:

Bonjour à vous tous,

Je travaille sur une "petite" macro qui doit à un moment donné imprimer un
fichier pdf stocké sur mon disque en toute transparence pour
l'utilisateur.

C'est à dire que la macro ouvre le fichier dans Acrobat Reader, l'imprime
et

referme Acrobat Reader.

J'ai le code pour ouvrir ce fichier :
ThisWorkbook.FollowHyperlink "C:Temptest.pdf"

Et c'est ensuite que cela se complique :
- je n'arrive pas à lancer l'impression.
j'ai essayé un SendKeys "^P", mais il ne se passe rien
- je n'arrive pas à refermer la fenêtre d'Acrobat Reader

Quelqu'un pourrait-il m'aider ???
(ma version d'Acrobat Reader est la 6.0, et Excel 2000)

Merci par avance.

NICO



Avatar
Nico
SUPER !!!! ça marche...

Merci beaucoup Daniel.