[Résolu] Aide à propos de PDFCReader1

[Lone-wolf]

Bonjour à tous,

j'ai le code ci dessous qui est obsolète et j'aimerais avoir plus de détail à propos de PDFCReader1.

Sub PDF()
Dim chemin$
Sheets(1).Activate
chemin = ThisWorkbook.Path & "\Tutoriel calendrier.pdf"
With ActiveSheet.PDFCReader1: .LoadFile (chemin): End With
End Sub

Merci d'avance pour votre aide


A+ 😎

 

[youky(BJ)]

Re : Aide à propos de PDFCReader1

Bonjour,
Perso j'aime bien utiliser les liens hypertext pour ouvrir les PDF
Exemple
ActiveWorkbook.FollowHyperlink ThisWorkbook.Path & "\Tutoriel calendrier.pdf", , True

A tester
Bruno

 

[MJ13]

Re : Aide à propos de PDFCReader1

Bonjour Lone, Bruno

Personnellement, j'abuse souvent du Shell. Voir sous ma signature, pour l'exemple 🙂.

 

[Lone-wolf]

Re : Aide à propos de PDFCReader1

Bonsoir Bruno, Michel,


Tous vas bien? 🙂 Merci d'avoir répondu.

@Bruno: oui bien sûr, mais je ne sais pas comment afficher la fenêtre en mode normal (non agrandie).

@MJ: c'est vrai que le Shell est mieux; et comme tu en abuse, je t'envois pleins de MI-MI 😉


il s'agit d'un ActiveX comme Webbrowser, mais, le fichier pdfc.ocx se trouve dans la version PDF Complete. En réinstallant celle-ci tout est rentré dans l'ordre.


A+ 😎