Bonjour,
Je n'arrive pas à détecter l'erreur dans le code vba suivant :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Private Sub CommandButton1_Click()
temp=0
Dim n As Integer
Dim i As Integer
n = TextBox2.Value
For i = 1 To n
temp = temp+[TextBox1.Value / ((1 + TextBox4.value) ^ i) '<-- ERREUR
Next i
TextBox5 = temp + (TextBox3.Value / ((1 + TextBox4.Value) ^ n))
End Sub
Sachant qu'on me dit que l'erreur se situe au niveau de la ligne indiquée ci-dessus.
Merci de m'aider si vous avez une idée.
Sachant qu'on le message sorti dit que c'est l'erreur d'exécution "13" incompatibilité des types.