Comment mettre en évidence toutes les cellules référencées par une formule dans Excel?

Cet article parle de mettre en évidence toutes les cellules référencées par une formule dans Excel. Veuillez suivre les deux méthodes ci-dessous pour le faire.

Mettez en surbrillance toutes les cellules référencées par une formule avec la touche de raccourci
Mettez en surbrillance toutes les cellules référencées par une formule avec le code VBA

Mettez en surbrillance toutes les cellules référencées par une formule avec la touche de raccourci

Incroyable! Utilisation d'onglets efficaces dans Excel comme Chrome, Firefox et Safari!

Économisez 50% de votre temps et réduisez chaque jour des milliers de clics de souris!

Cette section vous recommandera d'utiliser la touche de raccourci pour sélectionner toutes les cellules référencées par une formule, puis de leur remplir manuellement la couleur.

1. Supposons que E1 est une cellule de formule et que vous devez mettre en surbrillance toutes les cellules qui y ont été référencées. Veuillez sélectionner la cellule de formule E1, puis appuyez sur Ctrl + [ (le crochet carré ouvert) simultanément.

2. Maintenant que les cellules référencées par cette formule sont sélectionnées, veuillez spécifier une couleur de remplissage pour les mettre en évidence. Voir la capture d'écran:

Mettez en surbrillance toutes les cellules référencées par une formule avec le code VBA

Vous pouvez également exécuter du code VBA pour mettre en évidence toutes les cellules référencées par une formule dans Excel.

1. presse autre + F11 clés pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, veuillez cliquer insérer > Module. Ensuite, copiez et collez le code VBA ci-dessous dans la fenêtre Module.

Code VBA: mettez en surbrillance toutes les cellules référencées par une formule dans Excel

Sub HighlightCellsReferenced()
    Dim rowCnt As Integer
    Dim i As Integer, j As Integer, strleng As Integer
    Dim strTxt As String, strFml As String
    Dim columnStr, cellsAddress As String
    Dim xRg As Range, yRg As Range
    On Error Resume Next
    Set xRg = Application.InputBox(Prompt:="Please select formula cell(s)...", _
    Title:="Kutools For Excel", Type:=8)
    
    strTxt = ""
    Application.ScreenUpdating = False
    For Each yRg In xRg
        If yRg.Value <> "" Then
            strFml = yRg.Formula + " "
            strFml = Replace(strFml, "(", " ")
            strFml = Replace(strFml, ")", " ")
            strFml = Replace(strFml, "-", " ")
            strFml = Replace(strFml, "+", " ")
            strFml = Replace(strFml, "*", " ")
            strFml = Replace(strFml, "/", " ")
            strFml = Replace(strFml, "=", " ")
            strFml = Replace(strFml, ",", " ")
            strFml = Replace(strFml, ":", " ")
              
            For j = 1 To Len(strFml)
                If Mid(strFml, j, 1) <> " " Then
                    cellsAddress = cellsAddress + Mid(strFml, j, 1)
                Else
                    On Error Resume Next
                    Range(cellsAddress).Interior.ColorIndex = 3
                    cellsAddress = ""
                End If
            Next
        End If
    Next yRg
    Application.ScreenUpdating = True
End Sub

3. appuie sur le F5 clé pour exécuter le code. Dans le popping Kutools pour Excel boîte de dialogue, veuillez sélectionner une cellule de formule ou plusieurs cellules de formule sur lesquelles vous devez mettre en évidence les cellules référencées, puis cliquez sur le OK bouton. Voir la capture d'écran:

Maintenant, toutes les cellules référencées basées sur la ou les cellules de formule sélectionnées sont mises en surbrillance en rouge immédiatement comme illustré ci-dessous.

Articles connexes:

• Comment garder la référence de cellule de formule constante dans Excel?
• Comment référencer le nom de l'onglet dans la cellule dans Excel?

Les meilleurs outils de productivité de bureau

Kutools for Excel résout la plupart de vos problèmes et augmente votre productivité de 80%

• Réutilisation: Insérer rapidement formules complexes, graphiques et tout ce que vous avez utilisé auparavant; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
• Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtrée...
• Fusionner les cellules / lignes / colonnes sans perdre de données; Contenu des cellules divisées; Combiner des lignes / colonnes en double... Empêcher les cellules en double; Comparer les gammes...
• Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
• Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
• Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellules...
• Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
• Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF...
• Plus de 300 fonctionnalités puissantes. Prend en charge Office / Excel 2007-2019 et 365. Prend en charge toutes les langues. Déploiement facile dans votre entreprise ou organisation. Essai gratuit de 30 jours. Garantie de remboursement de 60 jours.

Lire la suite... Téléchargement Gratuit... Achat... 

---

Office Tab apporte une interface à onglets à Office et simplifie considérablement votre travail

• Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
• Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
• Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!

Lire la suite... Téléchargement Gratuit... Achat...