Aide Operations VBA racine carrée

BONJOUR J'AI VOULU CALCULER CETTE QUANTITÉ DONC J'AI CREER LE CODE SUIVANT , JE SAIS PAS SI C'EST VRAIMENT COMME ÇA J'AURAIS DU EFFECTUER LE CALCUL PARCEQUE J'ARRIVE PAS A METTRE LE 2015+7 DANS LE CODE . CHAQUE FOIS QUE J'ESSAIE ÇA CA ME MET RUN TIME :

Sub operatordemo7()
Dim x As Double
x = Sqr(1 + 2015 * Sqr(1 + 2016 * Sqr(1 + 2017 * Sqr(1 + 2018 * Sqr(1 + 2019 * Sqr(1 + 2020 * 2022#))))))
Debug.Print x
End Sub

Bonjour,

Essayez ceci:

    x = Sqr(1 + 2015 * Sqr(1 + 2016 * Sqr(1 + 2017 * Sqr(1 + 2018 * Sqr(1 + 2019 + Sqr(CDbl(1 + 2020 * CDbl((2015 + 7)))))))))

Cdlt

merci beaucoup le pb est réglé.