Xtian_Québec
XLDnaute Occasionnel
Bonjour le Forum,
Je cherche depuis plus de 2 heures dans ce merveilleux forum une solution à mon problème et je ne trouve pas donc je sollicite votre aide.
Je cherche depuis plus de 2 heures dans ce merveilleux forum une solution à mon problème et je ne trouve pas donc je sollicite votre aide.
Voici mon problème.
J'ai plusieurs fichiers PDF qui contiennent 2 pages. La première page correspond à un PLAN (dessin) et la seconde contient un tableau Excel (formulaire) qui a été collé comme image dans le fichier PDF.
J'ai la page 2 du fichier PDF (formulaire Excel) en format Excel (xls). Au lieu de remplacer la page 2 de mes fichiers PDF (supprimer la page 2 du PDF et réinsérer la nouvelle feuille Excel dans le fichier PDF) avec de nouvelles données qui sont saisient dans mon fichier Excel, j'aimerais faire l'action contraire, soit IMPORTER la page 1 du PDF dans mon fichier Excel. Comme le plan ne change pas, je voudrais coder mon fichier Excel pour importer cette page dans mon fichier Excel et ainsi pouvoir imprimer le PLAN avec les DERNIÈRES DONNÉES insérées dans mon fichier Excel.
J'ai cherché sur le forum et j'ai trouvé le code suivant pour ouvrir le PDF:
Private Sub CommandButton2_Click()
Dim stAppName As String
stAppName = "C:\Program Files\Adobe\Acrobat 6.0\Reader\AcroRD32.exe C:\le_nom_de_ton_document.pdf"
Call Shell(stAppName, 1)
End Sub
Dim stAppName As String
stAppName = "C:\Program Files\Adobe\Acrobat 6.0\Reader\AcroRD32.exe C:\le_nom_de_ton_document.pdf"
Call Shell(stAppName, 1)
End Sub
Ce code ouvre effectivement mon fichier PDF mais c'est là que je bloque...Comment récupérer SEULEMENT la page 1 du PDF et la copier dans mon fichier Excel. J'aurais besoin d'un code pour copier la page 1 et ensuite fermer le PDF.
Quelqu'un a une idée ?
Merci de votre habituelle aide.