XL 2019 lien hypertexte

[litchoutsou]

bonjour a tous j'espère que vous n'êtes pas trop désespère avec cette situation sanitaire que l'on vie
Voici l'aide dont j'aurai besoin , lorsque le lien hypertexte arrive à destination, j'aimerai que la cellule se colorie de jaune pâle
je joins un fichier modèle
Merci de votre aide

 

[sylvanu]

Bonjour Litchoutsou,
Un essai en PJ qui profite du fait que le lien hypertexte sélectionne la cellule en colonne N avec :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo Fin
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("N1:N100")) Is Nothing Then
        Range("N1:N100").Interior.Color = vbWhite
        Target.Interior.Color = RGB(255, 255, 150)
    End If
Fin:
End Sub

 

[litchoutsou]

super ça fonctionne terrible

 

[litchoutsou]

bonsoir a tous et encore merci a Sylvanu . J'ai rencontré un autre souci j'avais ma liste de nom en colonne N
et j'ai fait les liens hypertexte et fa formule fonctionne très bien , mais j'ai rencontré un autres soucis car j'ai du rajouté d'autre nom et faire un tri donc le lien ne correspondent plus, est possible d'associer un lien hypertexte a un nom.

 

[job75]

Bonsoir litchoutsou, sylvanu,

Avec la fonction LIEN_HYPERTEXTE, formule en B2 :

=LIEN_HYPERTEXTE("#Feuil1!N"&EQUIV("Dupont";N:N;0);TEXTE("6/4";"j-mmm"))

A+

 

[litchoutsou]

merci beaucoup à toute l'équipe, ça fonctionne du tonnerre