Boucle for step-1
blalaa
Messages postés
171
Statut
Membre
-
blalaa Messages postés 171 Statut Membre -
blalaa Messages postés 171 Statut Membre -
Bonjour,
je travaille sur un code avec la boucle for = derlin to 2 step-1 :
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
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
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
1 réponse
-
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.
-
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
-