With classeurDestination.Sheets("Suivi avenants génériques")
For ligne = 8 To .Range("C8").End(xlDown).Row '1° boucle pour parcourir tous les contrats de "Suivi avenants génériques"
numContrat = .Range("C" & ligne).Value
numAvenant = .Range("I" & ligne).Value 'on stock les valeurs recherchées dans les variables
For ligne2 = 2 To derniereLigne
If Sheets("traitementGenerique").Range("C" & ligne2).Value = numContrat And Sheets("traitementGenerique").Range("I" & ligne2).Value = numAvenant Then
Sheets("traitementGenerique").Range("A" & ligne2 & ":H" & ligne2).Copy .Range("A" & ligne)
Sheets("traitementGenerique").Range("I" & ligne2).Copy .Range("I" & ligne)
Sheets("traitementGenerique").Range("J" & ligne2).Copy .Range("K" & ligne)
Sheets("traitementGenerique").Range("K" & ligne2).Copy .Range("S" & ligne)
End If
Next ligne2
Next ligne
End With