Probleme de debogage
enimos
Messages postés
5
Date d'inscription
Statut
Membre
Dernière intervention
-
PlacageGranby Messages postés 402 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
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
-
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...
-
Quelle erreur ?
Un message ? Une réaction incorrecte ?
i=0 => Erreur ?
-
Re,
Envoie le code complet sinon on va y passer des heures...
-
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
