Calcul en Boucle dans userforme

Bonjour

J'ai un pb avec ce sous programme qui me permettrai de faire une somme de plusieurs multiplications en boucle a partir de textbox 200 à 220

J'ai réalisé cette boucle mais elle ne fonctionne pas :

J'ai comme message " incompatibilité de type"

Sub CalculTotalFI()
D = 0
For E = 200 To 220 Step 2
D = CDbl(Controls("TextBox" & E)) * CDbl(Controls("TextBox" & E + 1)) + D

Next
TxtTotalMaintenance.Value = D

End Sub

Donc Help

Peut être un problème de saisie dans une textbox une "," au lieu d'un "."

C'est bon j'ai réussi avec "Val" et des parenthèses bien positionnées

D = 0
For E = 200 To 220 Step 2
D = (Val(Me.Controls("TextBox" & E)) * Val(Me.Controls("TextBox" & E + 1))) + D

Next
TxtTotalMaintenance.Value = D

Slts