Boucle for step-1

Fermé
blalaa Messages postés 167 Date d'inscription mercredi 18 avril 2018 Statut Membre Dernière intervention 24 mars 2020 - Modifié le 16 mai 2019 à 10:42
blalaa Messages postés 167 Date d'inscription mercredi 18 avril 2018 Statut Membre Dernière intervention 24 mars 2020 - 16 mai 2019 à 12:56
Bonjour,


je travaille sur un code avec la boucle for = derlin to 2 step-1 :

derlin=  Worksheets(b).Range("a65000").End(xlUp).Row
For ii = derlin To 2 Step -1
If Worksheets(b).Cells(i, 1) = Workbooks(wb).Worksheets(b).Cells(ii, 1) And Worksheets(b).Cells(i, 5) = Workbooks(wb).Worksheets(b).Cells(ii, 5) And Worksheets(b).Cells(i, 6) = Workbooks(wb).Worksheets(b).Cells(ii, 6) Then
lin = Worksheets(b).Cells(i, 1).Row
Workbooks(wb).Worksheets(b).Rows(ii).Cut Workbooks(wb).Worksheets(b).Rows(lin)
End If
Next ii


maintenant je veux que monde traite mes instruction en commencant par la 2 eme ligne jusqua derlin ( qui est ma derniere ligne) mais sans avoire changer la boucle ,

exemple

Workbooks(wb).Worksheets(b).Rows(ii).Cut Workbooks(wb).Worksheets(b).Rows(lin)

la le code traite le couper coller en commençant de a derniere ligne

maintennat je veux quil commence de la 2 eme ligne vers la derniere

ya t il un moyen de le faire sil vous plait

je vous remerci davance
A voir également:

1 réponse

jordane45 Messages postés 38296 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 19 novembre 2024 4 704
16 mai 2019 à 12:25
Bonjour,

Si tu "coupes" une ligne...ça décale toutes celles qui sont en dessous vers le haut.
C'est pour ça qu'on fait toujours ce genre de boucle en partant du bas.


0
blalaa Messages postés 167 Date d'inscription mercredi 18 avril 2018 Statut Membre Dernière intervention 24 mars 2020
16 mai 2019 à 12:56
bonjour
pour etre plus claire , le code fait la comparaison de bases de données, ce code fonctionne bien dans le cas ou on a insere d'autre lignes dans la base de donnée source mais dans le cas ou on suprime des lignes dans la BDD sources le code ne fonctionne pas , je ne sais pas pour koi

avez vous une ideé SVP ?
merci
0