Boucle For step-1

bonjour

je travaille sur un code avec la boucle for :

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 commancant 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

Bonjour,

Sans changer le For, ça me semble difficile

bonjour

oui effictivement
merci quand mm pour votre reponse et je mexcuse et pour le retard

Ce sujet a été automatiquement fermé après 30 jours. Aucune réponse n’est permise dorénavant.