Bonjour,
je voudrais comparer deux tableaux, chacun sur deux feuilles différentes.
 
Ma première intention était celle-ci :
 
        Dim a As Integer
        Dim b As Integer
        Dim x As Integer
        Dim y As Integer
        Sheets("Feuill1" ).Select
        Range("a1" ).Select
        b = Range(ActiveCell, ActiveCell.End(xlDown)).Count
        Sheets("Feuill2" ).Select
        Range("a1" ).Select
        a = Range(ActiveCell, ActiveCell.End(xlDown)).Count    
        For y = 0 To b
            For x = 0 To a
 
   
 C'est au niveau de la comparaison que tout se complique :
 
  If Sheets("Feuill1" ).Cells(y, 2) = Sheets("Feuill2" ).Cells(x, 9)
 
  erreur d'exécution 1004, erreur définie par l'application ou par l'objet
   
 En parcourant le forum, j'ai essayé ceci :
  If workSheets("Feuill1" ).Cells(y, 2) = Worksheets("Feuill2" ).Cells(x, 9)
 
 Puis ceci :
  If workSheets("Feuill1" ).Cells(y, 2).value = Worksheets("Feuill2" ).Cells(x, 9).value
 
 Puis ceci :
  If Worksheets("Feuill1" ).Range("B" + CStr(y)).Value = Worksheets("Feuill2" ).Range("I" + CStr(x)).Value Then
                     
 mais rien n'y fait, toujours le même code erreur.
 
 Si quelqu'un pouvait m'aider .....
 Merci de votre attention
 
 
                   

La discussion aurait pu continuer sur l'autre fil.
 
Quel code erreur ? (edit : je viens de le voir en jaune brillant, ça fait mal aux yeux. Pas un code très parlant malheureusement, comme souvent avec VBA)
 
Est-ce que les feuilles ont les bons noms ?
Est-ce qu'il y a aussi une erreur en mettant en dur, juste pour un test, des valeurs numériques au lieu des variables x et y ?

Effectivement, il n'y a plus d'erreur en affectant une valeur à x et à y.
Ce qui m'a fait découvrir mon erreur : la première valeur que j'affecte à mes variables x et y dans mes boucles est égale à "0".
Désolé pour la couleur de fonte jaune, j'aurais dû prévisualiser avant.
Merci beaucoup pour ton aide.