Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment mettre en évidence les cellules liées par des hyperliens dans Excel?

S'il y a des liens hypertexte liés à la même feuille de calcul ou classeur, maintenant, la cellule de destination du lien hypertexte doit être remplie dans une couleur pour ressortir de la cellule liée, lorsqu'un autre lien hypertexte est cliqué, le premier redevient normal ci-dessous capture d'écran montré. Est-ce possible d'être résolu dans Excel?

lien hypertexte doc cellule surlignée 1

Mettez en surbrillance les cellules liées par des hyperliens avec le code VBA


flèche bleue droite bulle Mettez en surbrillance les cellules liées par des hyperliens avec le code VBA

Normalement, il n'y a pas de moyen direct pour nous de mettre en évidence les cellules de destination qui sont liées par des liens hypertexte, mais, le code VBA suivant peut vous aider, veuillez faire ceci:

1. Faites un clic droit sur l'onglet de la feuille que vous souhaitez mettre en évidence les cellules de destination qui sont liées par des liens hypertexte, puis choisissez Voir le code Dans le menu contextuel et dans la fenêtre ouverte Microsoft Visual Basic pour les applications, copiez et collez le code suivant dans le module vide:

Code VBA: Mettez en surbrillance les cellules liées par des hyperliens:

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
'Updateby Extendoffice 20161205
    Dim i As Long
    For i = 1 To ThisWorkbook.Sheets.Count
        Sheets(i).UsedRange.Interior.ColorIndex = -4142
    Next
    ActiveSheet.Cells.Interior.ColorIndex = red
    Selection.Cells.Interior.ColorIndex = 6
End Sub

2. Puis enregistrez et fermez ce code, maintenant, lorsque vous cliquez sur une cellule de lien hypertexte, la cellule liée de destination sera mise en surbrillance à la fois, lorsque vous cliquez sur un autre lien hypertexte, le premier redevient normal.



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Furka · 1 years ago
    Thank you so much guy!! This greatful code helped me a lot.