Fonction d'Excel qui retournerait la formule contenue dans une cellule

[Jaguar]

Bonjour,

Existe-t-il une fonction d'Excel qui retournerait la formule (et non pas la valeur) contenue dans une cellule ?

Cette fonction semble exister dans Calc : FORMULE(A1) retourne par exemple la chaîne de caractères "=A4*7+B2" si A1 contient la formule "=A4*7+B2".

Existe-t-il un équivalent sous Excel ?

 

[jeanpierre]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Bonsoir Jaguar, le forum,

Directement, non, sinon par Outils - Options - Affichage - Formules.

mais il existe plusieurs macros complémentaires qui font cela.

J'ai une fonction au bureau qui se nomme aff_formule, mais je ne sais plus de quelle macro complémentaire elle fait partie, je peux regarder cela demain matin.

Sinon voir Morefun ici : Ce lien n'existe plus avec texteformule..

Si tu n'as pas de réponses autres, je te dis à demain

Bonne soirée

Jean-Pierre

 

[Luki]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Bonsoir,

Une fonction personnalisée à coller dans un module du classeur, qui devrait faire l'affaire:

Function QuelleFormule(Cellule As Range) As String
QuelleFormule = Cellule.Formula
End Function

à insérer dans la feuille par :insertion/fonction/personnalisée ( tout en bas de la liste déroulante).

A+

EDITION IMPORTANTE

Function QuelleFormule(Cellule As Range) As String
[COLOR=Red] Application.Volatile [COLOR=Green]' pour qu'elle soit recalculée[/COLOR][/COLOR]
QuelleFormule = Cellule.Formula
End Function

 

[Sylvain]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Bonsoir,

une proposition de fonction à écrire en vba :

[size=2][color=black]  [/color][color=darkblue]Function[/color][color=black] Affiche_formule(ByVal plage [/color][color=darkblue]As[/color][color=black] Range) [/color][color=darkblue]As[/color][color=black] [/color][color=darkblue] String[/color][color=black]  
    Affiche_formule = plage.Range("a1").FormulaLocal  
[/color][color=darkblue]End[/color] [color=darkblue]Function[/color][color=black]  [/color][/size]

on peut alors écrire =Affiche_formule(A1)

A+

 

[SergiO]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Bonsoir Jaguar, jeanpierre,

Directement, non, sinon par Outils - Options - Affichage - Formules.

Pour info, le raccourci clavier correspondant à Outils - Options - Affichage - Formules est Ctrl et "

Sinon une solution.

Soit la formule en A1. Pour l'afficher le B1, aller dans Insertion - Nom - Définir...

Lui donner un nom (ex. Formule) puis dans fait référence à mettre ceci :

=LIRE.CELLULE(6;Feuil1!A1) puis valider.

Enfin taper =formule en B1 pour afficher la formule.

@+

Edition : Oh, il y a foule ici !!! Bonsoir à tous : pas vu 😱

 

[Luki]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Aïe, la bosse avec Sylvain!

Sylvain, pourquoi "plage.range("A1")" ? pour éviter une erreur si la plage saisie est plus grande?

A+

 

[Sylvain]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Oui et formulalocal pour avoir la formule en français.

A+

 

[jeanpierre]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Re ou bonsoir à tous

SergiO, j'avais pensé à LIRE.CELLULE, mais totalement infichu, ce soir, de mettre en place.
Mémoire... mémoire....

 

[Luki]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Merci Sylvain,
Encore une précision si tu veux bien : le Byval, pourquoi?

A+

 

[Sylvain]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Le byval, c'est une habitude (de toute façon une fonction qui va sur une feuille ne peut pas modifier la feuille).
Par contre quand on fait des passages de paramètres à une fonction en temps normal, si on ne fait pas attention la fonction peut modifier la valeur de la variable dans les procédures appelantes (la valeur par défaut est byref). Comme c'est rarement ce que l'on désire quand on utilise une fonction, j'ai pris l'habitude de passer toutes les informations à une fonction avec byval.

C'est tout.

 

[Luki]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Merci à toi Sylvain pour ces précisions et à vous tous, je vais me coucher plus cultivé ce soir qu' hier!

 

[Jaguar]

Re : Fonction d'Excel qui retournerait la formule contenue dans une cellule

Merci. Ces réponses sont parfaites. Tout marche !