comparaison de cellules sur 2 feuilles différentes - VB/VBA/VBS - Programmation
Marsh Posté le 21-12-2009 à 10:32:15
C'est un bon début.
Si les tableaux ne sont pas triés, il faut effectivement comparer chaque case du premier tableau avec chaque case du second tableau, et donc faire deux boucles imbriquées.
La comparaison se ferait par if (ThisWorkbook.Sheets("Feuil1" ).Cells(x1, y1).Value = ThisWorkbook.Sheets("Feuil2" ).Cells(x2, y2).Value) Then ... (non testé)
Si les tableaux sont triés, le traitement sera plus rapide car on peut faire un "appareillage", c'est à dire qu'après chaque comparaison, on avance d'une case dans le tableau qui contient la plus petite des deux valeurs rencontrées lors de la comparaison.
Marsh Posté le 21-12-2009 à 10:17:02
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