Erreur VBA

Bonjour,

Il y a bien longtemps que je n'ai plus pratiqué le VBA Excel ! Dans ce petit bout de code:
1     For i = 0 To 13
2     ActiveSheet.Range("$A$8:$RR$3461").AutoFilter Field:=3, Criteria1:="R" & i
3     Range("CJ" & i & ":RR" & i).Select     
4    Selection.Copy
5    Sheets("Feuil1").Select
6    Range("B" & i).Select
7    ActiveSheet.Paste
8   Next i

Je bloque sur une erreur en ligne 6 ???

   
       
       
       
       
       

Windows / Chrome 123.0.0.0