ouvrir un fichier pdf en vba sous excelRésolu

Question

voila je dois créer une macro sous excel qui lorsque que l'on clique dessus ouvre un fichier pdf se trouvant sous C:\. Je n'arrive pas à trouver le code permettant de réaliser cette action cad ouvrir un pdf.Si quelqu'un peut m'aider au plus vite dcela m'arrangerai. Merci d'avance.

mascio · Accepted Answer

Il y a (beaucoup) plus simple:

ActiveWorkbook.FollowHyperlink Address:=chemin & fichier

cs_wape · Answer

Il y a deux possibilités :

1. Avec la commande Shell :

Sub Ouvrir_pdf_shell()

Shell "C:\Program Files\Adobe\Acrobat 5.0\Reader\AcroRd32.exe C:\MonDocument.pdf", vbNormalFocus

End Sub

2. Avec l'API ShellExecute :

Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _
    (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
    ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd _
    As Long) As Long

Const SW_SHOWNORMAL = 1

Sub Ouvrir_pdf_api()
    
ShellExecute 0, "open", "C:\MonDocument.pdf", "", "", SW_SHOWNORMAL

End Sub

@+

wape

marinolive · Answer

Bonjour, j'ai une macro qui convertit des fichiers excel en pdf mais je n'arrive pas &#224; faire que le pdf soit sauvegard&#233; sans qu'acrobat me demande de valider le nom du fichier. Je crois qu'il faut avoir recours &#224; un "shell" mais je sais pas comment &#231;a marche. Vu le bout de code ci-dessus tu as l'air de ma&#238;triser ... saurais-tu comment faire ?

Merci

Olivier

fredpro59 · Answer

Merci merci et merci, la seconde méthode marche 2 pécable, contrairement à la première qui lance Acrobat sans réussir à ouvri le fichier ( fichier introuvable ).
Super content et fin d'une galère qont je ne voyais pas le bout !!

Ouvrir un fichier pdf en vba sous excel

4 réponses

Votre réponse

Discussions similaires