Bonjour le Forum,
J'aimerai pouvoir comparer deux colonnes de données de deux feuilles différentes. L'objectif étant de tester (les deux colonnes devant être identiques) si un changement a été effectué dans une des colonnes. Voici mon code:
Et là j'ai une erreur "l'indice n'appartient pas à la sélection". Je ne comprends pas bien. Est-ce que je déclare mal mes tableaux?
Merci de votre aide. 😉
J'aimerai pouvoir comparer deux colonnes de données de deux feuilles différentes. L'objectif étant de tester (les deux colonnes devant être identiques) si un changement a été effectué dans une des colonnes. Voici mon code:
Code:
Private Sub CommandButton2_Click()
Dim maColonnePrincipale, maColonneCompare
Dim MaJ As Boolean
With Sheets(3)
maColonnePrincipale = Array(range("E9:E287").Value)
Derligne = .range("A65536").End(xlUp).Row + 1
End With
With Sheets(1)
maColonneCompare = Array(range("F8:F287").Value)
End With
i = 1
k = 1
While i <> Derligne
test: If maColonnePrincipale(i).Value = maColonneCompare(k).Value Then
i = i + 1
k = j + 1
GoTo test
Else: MaJ = True
End If
Wend
End Sub
Et là j'ai une erreur "l'indice n'appartient pas à la sélection". Je ne comprends pas bien. Est-ce que je déclare mal mes tableaux?
Merci de votre aide. 😉