Comment savoir quelles cellules contiennent des formules

[Fab117]

Salut,
Je dois remanier 4 fichiers Excel en 1.
Chacun d'eux contient de nombreux onglets, qui parfois sont communs à 2 ou plus et parfois unique.
De plus et c'est là que j'ai un problème, certains ont le même nom, mais pas le même contenu.
Je vais donc devoir les renommer, mais comme certains des champs remplis par l'utilsateur sont repris dans d'autres onglets, il faut que je sois sur de bien établir les correspondances.
Y-a-t-il un moyen pour voir facilement dans les autres onglets si des champs dépendent d'un onglet donné ?
Merci d'avance.

Fab

 

[mjo]

Re : Comment savoir quelles cellules contiennent des formules

Bonjour,

Trois choses à savoir :

Lorsqu'on renomme un onglet d'un classeur, toutes les formules en liaison avec cet onglet se modifient automatquement.

Il existe deux icônes dans la barre d'outils, l'une pour repérer les antécedants, l'autre pour les descendants.

La touche clavier F5, puis Cellules Formules OK permet de sélectionner toutes les cellules contenant une formule.

mjo

 

[CB60]

Re : Comment savoir quelles cellules contiennent des formules

Bonjour,
il me semble que quelqu'un avait réalisé une macro mettant en gras toutes les cellules ayant une formule.
Si personne ne te donne une solution avant ce soir, je rechercherais cette macro à la maison
Bruno

 

[Fab117]

Re : Comment savoir quelles cellules contiennent des formules

Super,
Merci.

Fab

 

[Hervé]

Re : Comment savoir quelles cellules contiennent des formules

bonjour

pour bruno

un petit code qui colore en rouge les cellules contenant une formule :

With ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas, 23)
    .Interior.ColorIndex = 3
End With

salut

 

[Fab117]

Re : Comment savoir quelles cellules contiennent des formules

Parfait,
Merci et bonne fin de journée.

Fab

 

[CB60]

Re : Comment savoir quelles cellules contiennent des formules

re bonjour à tous,
j'avais bien raison, sur l'autre post,ça a vraiment l'air d'être simple pour vous.
Merci Hervé, je n'ai pas de recherche à faire et la solution est très interessante.
bruno
PS:Voici la macro d'Hervé
Sub CFormule()
'Suivi Formule
With ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas, 23)
'.Interior.ColorIndex = xlNone ' efface la couleur de la cellule
.Interior.ColorIndex = 3 'met la couleur de la cellule en rouge
.Font.Bold = True ' met la couleur de la police en gras
.Font.ColorIndex = 5 'met la couleur de la police en bleu
End With
End Sub