Discussion :

[legna986]

Bonjour à tous =)

Alors voilà j'essaye de faire une macro pour comparer deux colonnes qui contiennent des noms et j'aimerai savoir si les noms sont bien les mêmes et si le nom s'y retrouve bien

Donc voilà ma macro de départ :

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
Sub Find_Matches()
 
Dim CompareRange As Variant, x As Variant, y As Variant
 
 
 
Set CompareRange = Range("B1:B165")
 
    For Each x In Selection
 
        For Each y In CompareRange
            If x = y Then
                x.Offset(0, 3) = "ok"
            End If
        Next y
    Next x
 
End Sub

Si quelqu'un pouvait m'aider ce serait vraiment sympa car je suis vraiment bloqué ^^'

un grand merci d'avance en tout cas ^^