Excel: Erreur 2036

Bonjour, j'ai un petit soucis, quand je fais touner ma macro, j'ai un message d'erreur : Erreur d'exécution '13'
Incompatibilité de type

et quand je met un espion sur ma variable, ca me met comme valeur : Erreur 2036 et comme type :variant/error, c'est la première fois que j'ai ca et je ne vois pas comment résoudre le problème.

Quelqu'un peut m'aider?? :cry:

Non!


Pas sans ton code!


On n'est pas devins...

voilà mon code

Code:

---

1 2 3 4 5 6 7 8 9 10 11

If q1_envcont_confinal >= 1 Then q1_envcont_confinal = q1_envcont_confinal - 0.5 ElseIf q1_envcont_confinal >= 2 Then q1_envcont_confinal = q1_envcont_confinal - 1 ElseIf q1_envcont_confinal >= 3 Then q1_envcont_confinal = q1_envcont_confinal - 1.5 ElseIf q1_envcont_confinal >= 4 Then q1_envcont_confinal = q1_envcont_confinal - 2 ElseIf q1_envcont_confinal >= 5 Then q1_envcont_confinal = q1_envcont_confinal - 2.5 End If

---

et c'est pour le variable q1_envcont_confinal que ca me met le message d'erreur. normalement la variable est un nombre réel . cette partie du programme fait partie d'une boucle qui tourne sur 6000 lignes et ca bugs à la 757ème ligne.

t'a regardé la valeur à la ligne 757 pour voir s'il y avait pas une erreur ?

ç te surligne sur quelle ligne en jaune ou tu as l'erreur ?

Tu vois, c'est bien, tu nous donnes le N° de l'erreur. Mais pour connaître le message d'erreur, ça nous oblige à faire

Code:

---

1 2 3 4

Sub macro4() MsgBox Error(2036) 'Erreur définie par l'application ou par l'objet Msgbox Error(13) 'Incompatibilité de type End Sub

---

C'est agaçant !
Donc, le message d'erreur et la ligne concernée peinte en rouge, c'est mieux
Pour ton pb, comment déclares-tu q1_envcont_confinal et quelle est sa valeur quand tu as l'erreur ?