Comparer deux feuilles

Bonjour à tous,

Avec le code suivant, je peux comparer deux feuilles et rapporter le
résultat sur une troisième:

Sub jj()
With Sheets("Report")
For Each c In .Range("a2:a" & .Cells(Rows.Count, "a").End(3).Row)
If Not IsError(Application.Match(c, Sheets("Errors"). _
Range("a2:a" & Sheets("Errors").Cells(Rows.Count, "a").End(3).Row),
0)) Then
X = X + 1
.Rows(c.Row).Copy Sheets("Result").Range("a" & X) 'Copie la ligne
en entier
End If
Next
End With
End Sub

Ce que je voudrais, ce serait de rapporter ce qui est sur la feuille
Report sur la feuille Errors à partir de la colonne I vis-à-vis la
cellule correspondante (et non pas sur le feuille result)
Quelque chose comme ceci:

Sub jj()
With Sheets("Report")
For Each c In .Range("a2:a" & .Cells(Rows.Count, "a").End(3).Row)
If Not IsError(Application.Match(c, Sheets("Errors"). _
Range("a2:a" & Sheets("Errors").Cells(Rows.Count, "a").End(3).Row),
0)) Then
X = X + 1
'changement ici
.Rows(c.Resize(0,11)).Copy Sheets("Errors").Range("I" & X)
End If
Next
End With
End Sub

Excel n'aime pas..Sauriez-vous pourquoi?

Merci pour votre temps

Denys