Probleme de debogage

Fermé
enimos Messages postés 5 Date d'inscription jeudi 9 juillet 2015 Statut Membre Dernière intervention 26 juillet 2015 - 9 juil. 2015 à 13:52
PlacageGranby Messages postés 393 Date d'inscription mercredi 26 mars 2014 Statut Membre Dernière intervention 7 mars 2019 - 9 juil. 2015 à 15:38
Bonjour
j arrive pas a trouver la nature de l erreur dans cette boucle
do until cells(i,1).text=combobox1.text
i=i+1
loop

4 réponses

ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
9 juil. 2015 à 13:59
Bonjour Enimos,

Qu'elle est l'erreur justement ?
Comme tu n'as pas défini (ou te ne le montres pas dans le bout code) la variable i, elle vaut 0 (zéro) par défaut et Cells(0, 1) ça plante...
0
enimos Messages postés 5 Date d'inscription jeudi 9 juillet 2015 Statut Membre Dernière intervention 26 juillet 2015
9 juil. 2015 à 14:16
j ai initialisé i à 1
et l erreur s affiche d ans l instruction i=i+1
0
NHenry Messages postés 15113 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 22 avril 2024 331
9 juil. 2015 à 14:01
Quelle erreur ?
Un message ? Une réaction incorrecte ?

i=0 => Erreur ?
0
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
9 juil. 2015 à 14:42
Re,

Envoie le code complet sinon on va y passer des heures...
0
PlacageGranby Messages postés 393 Date d'inscription mercredi 26 mars 2014 Statut Membre Dernière intervention 7 mars 2019 26
Modifié par PlacageGranby le 9/07/2015 à 15:45
Bonjour Enimos

Tu as posé une autre question à la quelle Jordane45 a répondu.
C'est probablement le même problème ici.

Il n'y a pas de propriété .text pour un objet cell.
Ce serait .value.

do until cells(i,1).value=combobox1.text
i=i+1
loop


A vérifier si tu compare du texte ou des chiffre.
Si par exemple, tu compares la valeur 12345, Cells(i,1) va retourner un chiffre en valeur, et combobox va retourner du texte. donc même si ca semble pareil, ce ne l'est pas.

On doit convertir en texte au besoin pour être sûr a l'aide de cstr().

do until cstr(cells(i,1).value)=combobox1.text
i=i+1
loop
0