Bonjour Tout le monde,

Voila mon problème, j'aimerais comparer 2 colonnes excel de type string en VBA pour me faciliter la tâche au travail.

J'ai réalisé le code suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Sub tri()
Dim compar As Boolean
For i = 1 To 300
 
            j = 1
 
            Do While Range("A" & i).Value <> Range("E" & j).Value And i <= 300
                test = False
                j = j + 1
 
                    If Range("A" & i).Value = Range("E" & j).Value Then
                        compar = True
                        Range("H" & i).Value = "ok"
                    Else
                        Range("H" & i).Value = "Introuvable"
                    End If
 
            Loop
 
    Next
 
 
End Sub


Si le champ de ma colonne "A" d'indice I est introuvable, le code s'arrête et ne passe pas à l'indice supérieur. Comment faire? Quelqu'un peut-il m'aider ?

En vous remerciant par avance,