Bonjour a tous,

j'ai un léger problème du au fait que je ne connais pas bien VBA
J'ai une macro qui me trouve des différences entre deux plages sur deux onglets et met les différences en rouge.

Pour les chiffres, cette macro fonctionne très bien !
En revanche, j'aimerais la faire tourner sur une colonne de 500 lignes, ou chaque cellule contient un Nom et un prénom.
Le problème est que dans l'onglet 1, les cellules sont sous la forme :

Jean Baptiste Chevalier
Pierre de Machin
etc.


et dans l'onglet 2 :

Chevalier Jean Baptiste
de Machin Pierre


Ainsi, ma macro me détecte des erreurs partout, car elle cherche un contenu exact.

Voici la macro en question :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Sub colorier()
 
For Each cel In Range("H1:H300")
Set absent = Range("'2'!H1:'2'!H300").Find(cel, LookIn:=xlValues, LookAt:=xlWhole)
If absent Is Nothing Then
cel.Interior.ColorIndex = 3
End If
Next
 
End Sub


Voyez vous quelquechose a faire sur la partie
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Find(cel, LookIn:=xlValues, LookAt:=xlWhole)
afin que cela fonctionne ?

D'avance merci !

Cordialement