Probleme de debogage

enimos Messages postés 5 Statut Membre -  
PlacageGranby Messages postés 402 Statut Membre -
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 1564 Statut Membre 160
 
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 Statut Membre
 
j ai initialisé i à 1
et l erreur s affiche d ans l instruction i=i+1
0
NHenry Messages postés 15479 Statut Modérateur 366
 
Quelle erreur ?
Un message ? Une réaction incorrecte ?

i=0 => Erreur ?
0
ThauTheme Messages postés 1564 Statut Membre 160
 
Re,

Envoie le code complet sinon on va y passer des heures...
0
PlacageGranby Messages postés 402 Statut Membre 26
 
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