Erreur VBA

Résolu
Mikel.d Messages postés 23 Date d'inscription   Statut Membre Dernière intervention   -  
Mikel.d Messages postés 23 Date d'inscription   Statut Membre Dernière intervention   -

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

1 réponse

  1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 588
     

    bonjour,

    la ligne 0 n'existe pas.

    For i = 0 To 13
        ' ...
        Range("B" & i).Select
    Next i
    1
    1. Mikel.d Messages postés 23 Date d'inscription   Statut Membre Dernière intervention  
       

      Merci pour ta réponse ... 
      Effectivement, en partant de i=1 ça fonctionne mieux !
      Cordialement, Mikel

      0