Lien vers une fiche PdF selon le nom du fichier dans une cellule.
tacounet
Messages postés
28
Date d'inscription
Statut
Membre
Dernière intervention
-
tacounet Messages postés 28 Date d'inscription Statut Membre Dernière intervention -
tacounet Messages postés 28 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Je souhaiterais pouvoir réaliser, dans un document Excel, un lien qui me permettrait d’ouvrir, si je le souhaite, un fichier PdF.
J'explique:
Dans une cellule K2, j'affiche, via liste de choix, le nom d'un site parmi d'autres.
Chacun de ces sites dispose, dans un fichier, d'une fiche PdF de caractéristiques.
Sachant que je découvre les multiples options d'Excel au fur et à mesure, est-il possible, via hypertexte ou macro de réaliser ce que je souhaite ?(je pars pas loin de zéro du coté des macros ;-) )
Merci de votre aide
Tac
Je souhaiterais pouvoir réaliser, dans un document Excel, un lien qui me permettrait d’ouvrir, si je le souhaite, un fichier PdF.
J'explique:
Dans une cellule K2, j'affiche, via liste de choix, le nom d'un site parmi d'autres.
Chacun de ces sites dispose, dans un fichier, d'une fiche PdF de caractéristiques.
Sachant que je découvre les multiples options d'Excel au fur et à mesure, est-il possible, via hypertexte ou macro de réaliser ce que je souhaite ?(je pars pas loin de zéro du coté des macros ;-) )
Merci de votre aide
Tac
A voir également:
- Lien vers une fiche PdF selon le nom du fichier dans une cellule.
- Lire le coran en français pdf - Télécharger - Histoire & Religion
- Fichier bin - Guide
- Fichier epub - Guide
- Lien url - Guide
- Fichier rar - Guide
2 réponses
Bonsoir,
C'est très simple de faire un lien hypertexte en VBA.
Bien sûr, pour l'adresse, on peut utiliser des variables et le TextToDisplay aussi.
Par exemple, voici un code plus complet
C'est très simple de faire un lien hypertexte en VBA.
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="D:\fichier.pdf " TextToDisplay:="Voir PDF"
Bien sûr, pour l'adresse, on peut utiliser des variables et le TextToDisplay aussi.
Par exemple, voici un code plus complet
Sub Lien() Dim chemin as String Dim nomfichier as String chemin = "D:\" nomFichier = Range("K2").Value ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=chemin & nomFichier & ".pdf " TextToDisplay:="Voir la fiche de " & Range("K2").Value End Sub
Bonjour à tous.
N'étant vraiment pas à l'aide avec le VBA, je suis passé par la formule concatener d'excel pour réaliser mon lien hypertexte.
Du style A1: Lien hypertexte vers le dossier où sont rangés mes Pdf, A2: nom de mon dossier Pdf (variable par liste de choix, A3 : concaténer A1, A2 et l,extension .pdf, et ça fonctionne.
C'est certainement tiré par les cheveux, il doit y avoir plus simple, mais c'est fonctionnel.
Merci
N'étant vraiment pas à l'aide avec le VBA, je suis passé par la formule concatener d'excel pour réaliser mon lien hypertexte.
Du style A1: Lien hypertexte vers le dossier où sont rangés mes Pdf, A2: nom de mon dossier Pdf (variable par liste de choix, A3 : concaténer A1, A2 et l,extension .pdf, et ça fonctionne.
C'est certainement tiré par les cheveux, il doit y avoir plus simple, mais c'est fonctionnel.
Merci