bonjour
1) tu colles ça dans un module ,si il y en a pas ,il faut le creer
Function Eval(c)
Eval = Evaluate(Replace(c.Formula, ",", "."))
End Function
pour creer un module
1) les touches Alt et F11
2)la fenetre vb etant ouverte tu vas sur insersion (en haut) et tu cliques sur module
une fois collé tu utilises comme une vulgaire fonction
tu saisi = eval( ta cel)
cordialement