Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 Trouver les cellules dépendantes de celle choisis

tuti

XLDnaute Occasionnel
bonjour,
dans une cellule contenant une formule, je clique sur la formule pour voir ( via carré de couleurs ) les cellules concernés

mais est il possible de faire l'inverse


en A1, j'ai un 10 ( par exemple )
je pense que ce résultat sers dans une autre cellule ( via une formule ) ailleurs mais je ne sais quel cellule ( tableau trop grand )

d'une certaine manière, en cliquant sur A1, est il possible de voir quel cellule récupère cette information


merci
 

soan

XLDnaute Barbatruc
Inactif
Bonjour tuti,

bonne année 2021, et meilleurs vœux.

* sélectionne d'abord A1 (où il y a 10)

* onglet Formules, groupe « Audit de formules », clique sur
le 1er item en haut à gauche : « Repérer les antécédents »

exemple en image (pour Excel 2007) :




c'est ce qui met la flèche bleue ; la flèche part de C5, car C5 est utilisé
dans la formule de A1 (qui est visible sur l'image : regarde la barre de formule).

ensuite, pour enlever la flèche bleue, tu pourras cliquer sur l'item
« Supprimer les flèches » (avec devant l'icône d'une petite gomme).

edit : bonjour Dranreb
(on s'est croisés)

soan
 
Dernière édition:

soan

XLDnaute Barbatruc
Inactif
@Dranreb

ooopppsss ! oui, tu as raison, j'ai inversé ! alors nouvelle image :



on le voit pas sur l'image, mais la formule en C5 est : =A1+2

or c'est bien A1 qu'il faut sélectionner avant de cliquer
sur « Repérer les dépendants ».


soan
 

tuti

XLDnaute Occasionnel
merci pour vos réponses,
je ne connaissais pas

d'ailleurs en cliquant sur REPERER LES ANTECEDANTS, cela me donne un symbole de feuille ( pour indiquer que cela se trouve sur un autre onglet )
est il possible de trouver ces antécedants sur les autres feuilles ?
( car je ne sais pas forcement ou trouver ceci ailleurs )
 

Dranreb

XLDnaute Barbatruc
Sinon cette procédure peut les afficher :
VB:
Sub Dépendants()
   Dim Cel As Range
   On Error Resume Next
   For Each Cel In ActiveCell.Dependents
      If Err Then MsgBox Err.Description: Exit Sub
      If MsgBox(Cel.Address(External:=True) & vbLf & Cel.FormulaLocal, _
         vbOKCancel + vbInformation) = vbCancel Then Exit Sub
      Next Cel
   End Sub
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…