Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Alex63

XLDnaute Nouveau
Bonjour à tous!

j'ai fais un petit code qui me permet de demander à l'utilisateur de sélectionner un lien hypertexte dans n'importe quel fichier excel et de montrer l'adresse de ce lien par la fonction msgbox. Je cherche l'adresse d'un fichier et non une adresse internet.
Sauf que la fonction .address ne me montre pas le chemin complet du fichier:

Sub adresshyperlien()
Dim adrhyperlien As String
Set donnees = Application.InputBox("Choisir cellule", Type:=8)
adrhyperlien = donnees.Hyperlinks(1).Address
MsgBox adrhyperlien

End Sub

Quelqu'un a une idée??

Merci beaucoup!:cool:
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

J'ai testé avec un lienhypertext, lequel pointe sur un fichier sur un disque.
Chemin et nom du fichier me donnent 76 caractères en tout ... et ton code fonctionne correctement.


Jecherche
 

Alex63

XLDnaute Nouveau
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Merci pour votre réponse. Oui, mon code fonctionne, j'ai effectivement une partie du chemin de fichier mais il n'est pas complet, je n'ai que les 2 derniers dossiers contenant le fichier.

/../../../dossier1/dossier2/fichier.pdf

je n'ai pas le début du chemin qui devrait commencer par C:/

Vous parvenez à avoir toute l'adresse?

Merci de votre répondre! :)
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Oui, je vois le chemin complet ... structure de 7 sous-dossiers en profondeur et le tout s'affiche bien dans le msgBox.

Peut-être ne testons-nous pas sur le même type de lien hypertexte ?

Car mes séparateurs sont penchés vers la gauche ... comme ceci ...

... C:\Users\Jecherche\Desktop\DYMO Label\Labels\Layouts\Recent Layouts\Adresse.label


Jecherche
 

Alex63

XLDnaute Nouveau
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

rebonjour,
Oui pardon, c'est dans le même sens que vous, mais je n'ai pas tous ces dossiers.
C'est peut être du à réglage, mais je ne vois pas lequel..
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Aurais-tu un bout de fichier avec un lien qui est en problème chez-toi ?

Il serait simple de reproduire la structure ici afin de comparer.


Jecherche
 

Alex63

XLDnaute Nouveau
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

je ne comprend pas ce que tu veux faire :)

le lien je le crée en faisant insertion/lien hypertexte..

je ne vois absolument pas où est le problème, j'ai essayé ce code sur 2 pc différents et j'ai le même résultat..
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Quelle version de Excel utilises-tu ?

Et sur quelle version de Windows ?


Jecherche
 

Alex63

XLDnaute Nouveau
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Excel 2010 sous Windows 10!
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

À la maison, je roule Office 2016...

J'ai Office 2010 au bureau. Je teste cela demain sans faute.


Jecherche
 

Alex63

XLDnaute Nouveau
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Super merci beaucoup!!
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Impossible, pour l'instant, de reproduire ton problème.

Est-ce que ça donne le même résultat avec des chemins courts ?


Jecherche
 

Alex63

XLDnaute Nouveau
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,
oui c'est la même chose pour tous les fichiers..
De votre coté ca marche avec Office 2010?
 

Alex63

XLDnaute Nouveau
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Pardon mais je viens de me rendre qu'il s'agissait de Office 2013..
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Si sur Excel 2010 et 2016, ça fonctionne, il n'y a pas de raison que ce soit différent sur la version 2013.

Et si tu testes en créant un nouveau fichier Excel qui n'aurait qu'un hyperlien et la macro du post #1 ... Quel serait le résultat ?

Je soupçonne une interférence "autre"...



Jecherche
 

Alex63

XLDnaute Nouveau
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

le résultat est le même..
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Il va falloir un meilleur cerveau que les nôtres :eek:


Jecherche
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Je crois que cela puisse être lier aux options de l'Explorateur Windows. J'ai effectué plusieurs changements et je me retrouve maintenant avec le même affichage que chez-toi.
Je continue à chercher afin de trouver où maîtriser ce phénomène.

Je reviens.

Jecherche
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Pour l'instant, les liens sont corrects si le fichier pointé est situé sur un autre lecteur que le C:
Mais, dès que je retourne sur le C: ... patate ... ..\..\blablabla


Jecherche
 

jecherche

XLDnaute Occasionnel
Re : Comment obtenir le chemin complet d'un fichier se trouvant dans un hyperlien

Bonjour,

Zenfin satellipopettes ... à tester ... ici ça fonctionne ... j'ai corrigé mes fichiers ...

Ouvrir le fichier problématique, onglet Fichier ... dans la colonne de gauche ... Informations ... en bas à droite "Afficher toutes les propriétés" ... à la ligne "Répertoire Web" clique et ajoute un caractère ... disons x
Dans la colonne de gauche ... Enregistrer ... tester l'ajout d'un lien hypertexte ...

Miracle : ____
Wouin : ____
Désespoir : ____


Jecherche ... parfois longtemps :rolleyes:
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas