Microsoft 365 Comment trouver les cas d'emploi d'une cellule dans les formules

[jb36123]

Bonjour à tous,,
Dans un fichier EXCEL complexe avec des formules nombreuses liant tout un tas de cellules entre elles, je cherche un moyen de determiner pour une cellule donnée où celle ci serait utilisée dans d'autres cellules au travers des formules. C'est dans le but de simplifier la maintenance ou l'evolution du fichier.
Ca serait utile aussi lorsqu'on récupère un fichier qu'on a pas développé soit même.

j'ai un cas simple pour lequel j'ai une solution, c'est lorsque on utilise des cellules nommées. par exemple si j'ai nommée une cellule TAUX_TVA en faisant une simple recherche (ctrl-F) je peux retrouver toutes les cellules qui ont une formule qui contient "TAUX_TVA".
Mais pour les formules qui font de l'adressage relatif, ou absolu ca ne marche pas.

 

[djidji59430]

Bonjour à tous,

Tu vas dans FORMULES ==>Vérification des formules


Crdlmt

 

[danielco]

Bonjour,

J'ai adapté ce code du site

VBA: Determine All Precedent Cells – A Nice Example Of Recursion

I’ve been working on a project for this blog which I’ve found quite demanding. It’s taken me to parts of the Excel object model which I’ve never explored and challenged me t…

colinlegg.wordpress.com

Sub Test1()
 
    Dim rngToCheck As Range
    Dim rngPrecedents As Range
    Dim rngPrecedent As Range
 
    Set rngToCheck = ActiveCell
 
    On Error Resume Next
    Set rngPrecedents = rngToCheck.Dependents
    On Error GoTo 0
 
    If rngPrecedents Is Nothing Then
        Debug.Print rngToCheck.Address(External:=True) & _
                    " n'a pas de dédpendants"
    Else
        For Each rngPrecedent In rngPrecedents
            Debug.Print rngPrecedent.Address(External:=True)
        Next rngPrecedent
    End If
 
End Sub

Le résultat s'affiche dans la fenêtre d'exécution. Je peux l'adapter pour lister les résultats sur une feuille.

Cordialement.

Daniel