Bonsoir,
en passant le fichier en .xlsM, et en y ajoutant une fonction personnalisée dans un module standard :
Function Eval(c as range)
Eval = Evaluate(Replace(c.Formula, ",", "."))
End Function
ensuite si l'expression est en A1 et vous voulez le résultat en B1 alors en B1 inscrit cette formule :
=Eval(A1)
Sous VBA il faut remplacer les virgules par un point pour les chiffres décimaux, c'est pourquoi il y a aussi le "Replace".
Je ne crois pas qu'il y en en "formule" l'équivalant de Evaluate sous VBA...
@ bientôt
LouReeD