[Excel] Comment savoir si la cellule contient un lien hypertexte ?

Version imprimable

13/12/2004, 13h31
Millenod

[Excel] Comment savoir si la cellule contient un lien hypertexte ?

Bonjour,

Je dispose d'un tableau de 4 colonnes, et 200 lignes sous excel.
La colonne 1 contient le nom d'un projet, et possède en général, un lien vers un dossier sur une machine distante.

Comment puis-je faire pour tester si la cellule possède un lien hypertexte, et le cas échant d'extraire la valeur de celui-ci?

Merci d'avance pour vos réponses.

Voici deux petites macros qui semble fonctionner :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Function EstHyperLien(ARange As Range) As Boolean
 
EstHyperLien = False
For Each h In Worksheets(1).Hyperlinks
    If h.Range = ARange Then
        EstHyperLien = True
        Exit For
    End If
Next
 
End Function
 
Function AdresseHyperLien(ARange As Range) As String
 
AdresseHyperLien = ""
For Each h In Worksheets(1).Hyperlinks
    If h.Range = ARange Then
        AdresseHyperLien = h.Address
        Exit For
    End If
Next
 
End Function

16/12/2004, 10h40
Millenod

merci pour le code.
ca marche :)
16/12/2004, 11h01
ElNan

Alors met le topic en Résolu. :coucou: