XL 2016 Conversion Formule (texte) en résultat

[Lolote83]

Bonjour à tous,
Je récupère sous format de chaine de caractère une formule et je souhaiterais avoir le résultat
J'ai simplifié ce code pour vous expliquer la situation.
Y-a-t-il une possibilité de calculer le résultat d'une formule sous forme de chaine. J'ai utilisé la fonction VAL, mais cela ne fonctionne pas
Mon cas de figure est plutôt dirigé sur la troisième partie ci-dessous

Sub TestFormule()
    'Partie 1 = La fonction VAL = OK
    x1 = "123.45"
    y1 = Val(x1)
 
    'Partie 2 = La fonction VAL = NON OK
    x2 = "12+(34*2)"
    y2 = Val(x2)

    'Partie 3 = La fonction VAL = NON OK
    x3 = "(C-32)/1.8"
    xValC = 12
    y3 = Replace(x3, "C", xValC)
    Z3 = Val(y3)
End Sub

Le but final était d'en faire une fonction personnalisée en fonction de la formule de départ.
Je tourne en rond.
Merci par avance
@+ Lolote83

 

[Bernard_XLD]

Bonjour Lolote83, le forum

Essaye evaluate

Bien cordialement, @+

Sub TestFormule()
    'Partie 1 = La fonction VAL = OK
    x1 = "123.45"
    y1 = Val(x1)
 
    'Partie 2 = La fonction VAL = NON OK
    x2 = "12+(34*2)"
    MsgBox Evaluate("=" & x2)
   
    'Partie 3 = La fonction VAL = NON OK
    x3 = "(C-32)/1.8"
    xValC = 12
    MsgBox Evaluate("=" & Replace(x3, "C", xValC))

End Sub

 

[Lolote83]

Bonjour Yeahou,
YES,YES,YES.
Merci.
Pourquoi n'y ai-je pas pensé plus tôt.
Merci
@+ Lolote83