Récupérer une adresse de lien en VBA excel

Iama Messages postés 319 Date d'inscription   Statut Membre Dernière intervention   -  
Iama Messages postés 319 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous

J'ai dans une cellule un lien vers un dossier
« C:\Users\Iama\Documents\Adobe\Armoire\06-Papera \Chiffre\03-Compte »

Je désire dans une macro récupérer ce lien pour ouvrir un fichier.

Avec la fonction : .Address j'obtiens=> "..\..\06-Papera \Chiffre\03-Compte "
Une adresse incomplète qui ne fonctionnement pas

En utilisant : .Application.defaultFilePath j'obtiens => "C:\Users\Iama\Documents"

Mais je n'arrive pas à récupérer : « \Adobe\Armoire\ »

Quelqu'un pourrait-il me renseigner SVP ?

Iama


excel 2007

4 réponses

Réponse 1 / 4
pijaku Messages postés 12263 Date d'inscription   Statut Modérateur Dernière intervention   2 761
 
Bonjour tout le monde,
Essayez cette procédure : 
Dim lien As String
If Range("A1").Hyperlinks.Count > 0 Then
    lien = Range("A1").Hyperlinks(1).Address
End If
MsgBox lien
2
Iama Messages postés 319 Date d'inscription   Statut Membre Dernière intervention   14
 
Bonjour pijaku

J vais essayere de ce pas

Merci
0
Iama Messages postés 319 Date d'inscription   Statut Membre Dernière intervention   14
 
pijaku

Je viens de tester, j'ai ajouté à ta solution
j = Range("A1").Hyperlinks.Count
La varable j est égale à 0 pourtant quand je clck sur cette cellule j'a bien un dossier qui s'ouvre

Je ne comprend pas. As-tu une idée? SVP
Iama
0

Discussions similaires

valeur cellule dans lien hypertexte excel
letof40 -
letof40 -

2 réponses
récupérer liens hypertexte et la valeur d'une cellule
doktorquick -
Frenchie83 -

1 réponse
Comment extraire les liens hypertextes ?
Guy -
JvDo -

1 réponse
Macro recherche dans une colonne excel
gaara35 -
clark...kent -

9 réponses
chercher une valeur dans un tableau excel
laboots -
Vaucluse -

10 réponses
Lien hacker
ANNA -
jalil -

3 réponses