XL 2010 VBA - Insérer un PDF en tant qu'image dans une feuille Excel

[tchi456]

Bonjour,

J'ai un code qui fonctionne parfaitement bien (grâce aux talents des personnes se trouvant sur ce site) pour pouvoir insérer le nom d'un fichier dans une cellule et mettre son chemin d'accès dans la cellule d'à côté. Cependant je souhaiterais également pouvoir sélectionner uniquement des fichiers PDF et que le fichier PDF sélectionné soit insérer en tant qu'image dans la feuille "1" ou "2"...."10".

Exemple:
Si je clique dans la cellule B5 de ma feuille "Liste des plans", j'aimerais que ça ouvre un explorateur de fichiers et lorsque je sélectionne un plan PDF (que des formats A3), le nom de ce fichier apparaisse dans ma cellule B5 et que le plan en question soit inséré comme image dans la feuille "1".

Est-ce que c'est réalisable? Si "oui" pouvez-vous m'aider?

Si les feuilles "1", "2", etc.. pouvaient se créer automatiquement lorsque je sélectionne un PDF ce serait le summum de la perfection mais je doute que cela soit possible.

Mes meilleures salutations,

Thierry

 

[TooFatBoy]

Sauf à relire tes documents, que me manque-t-il ? Acrobat ?

Oui, il faut avoir PDFcreator.
Enfin... c'est ce qui m'avait été répondu dans un autre fil quand j'avais posé la question.

 

[Dudu2]

OK merci.

 

[kiki29]

Salut, raté pour PDFCreator, dans Load_PDF_Forum_03.xlsb il s'agit d'Acrobat ( pas du Reader ).
Et en plus c'était écrit en toutes lettres .....

Dans le Post 14, Il y a 2 fichiers de test nommés Test 3 Acrobat.xlsm et Test 3 sans Acrobat.xlsm ...

 

[TooFatBoy]

Salut, raté pour PDFCreator, dans Load_PDF_Forum_03.xlsb il s'agit d'Acrobat ( pas du Reader )

Arf ! Zut !

Bon, en même temps, sans le code, je me doutais un peu que j'allais me planter...

 

[TooFatBoy]

OK merci.

Bon ben... désolé, j'm'a gouré...
La réponse était bien "oui", mais c'était "Acrobat", comme tu l'avais dit !

 

[tchi456]

Re, à lire : CodeName ainsi que ceci
L'utilisation du CodeName permet à l'utilisateur de renommer l'onglet de la feuille, de déplacer cette feuille dans le classeur, sans avoir à retoucher au code VBA.

Bonjour kiki29,

Votre fichier Test 3 sans Acrobat me convient parfaitement.

Je ne voudrais pas abuser mais serait-il possible de se passer des deux boutons "Importer PDF" et "Supprimer PDF" et d'insérer les PDF sur les feuilles correspondantes en même temps que je les sélectionne depuis la feuille "Liste des dessins" (cellules B7:B16) ?

Le fichier est verrouillé par mot de passe; c'est un point "."

Meilleures salutations,

Thierry

 

[Dudu2]

Bon, c'est Acrobat. Mais Acrobat (pas le reader) c'est pas gratuit. Comment se le procure-t-on ?

 

[kiki29]

Re, sur le site d'Adobe
J'en suis resté à Adobe Acrobat Standard DC version 2015 ( 640 € à l'époque sur CDRom )

 

[Dudu2]

@kiki29,
Merci pour l'info. Le site dit dans les 50€ / mois.
Ça se conçoit dans le monde professionnel, mais ça fait un peu cher pour mon usage domestique.

 

[Dudu2]

Est-ce à dire que tous tes utilitaires PDF requièrent Adobe Acrobat ?

 

[kiki29]

Re, non, voir dans la colonne A de Liste Contributions PDF

 

[Dudu2]

OK compris !
Sacré boulot que tu as fait !