Comment savoir où se trouvent les leins hypertextes dans EXCEL

Fermé
tamiers364 Messages postés 22 Date d'inscription mercredi 24 juin 2009 Statut Membre Dernière intervention 5 avril 2014 - 9 déc. 2013 à 15:14
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 9 déc. 2013 à 15:55
Bonjour,

Je souhaiterai retrouver (et afficher) dans EXCEL les cellules qui contiennent un lien hypertexte (celui-ci peut ne pas avoir le format standard d'un lien HT bleu souligné)

Merci d'avance

Tamiers364
A voir également:

1 réponse

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
9 déc. 2013 à 15:55
Bonjour,

Par VBA, ce code te colore de rouge (ou vert ou jaune, au choix), les cellules contenant des liens :

Sub Adresse_Hyperliens()
Dim lien As Hyperlink

For Each lien In ActiveSheet.Hyperlinks
    'remplacer 3 : pour vert par 4; pour jaune par 6
    lien.Range.Interior.ColorIndex = 3
Next
End Sub


Pour l'utiliser :
1- ouvrir le classeur concerné,
2- taper ALT+F11 ==> la fenêtre visual basic editor s'ouvre
3- Insertion / Module
4- Dans la fenêtre de code de ce module, copiez-collez le code ci-dessus
5- fermer la fenêtre visual basic editor
6- Se positionner sur la feuille concernée
7- Taper Alt + F8,
8- choisir Adresse_Hyperliens
9- puis cliquer sur Exécuter
0