Comparer le contenue de 2 cellules

Bjr,

J'explique mon cas.

Un outil informatique me crahe un rapport automatique. Après traitement j'ai un fichier (extraction automatique) exploitable sous Excel qui comporte plusieurs lignes. C'est ligne font references à n produits differents concernés. Chaque ligne à au moins 2 colonnes. Pour un même produit, la 1er cellule contient une liste de nom, séparé par une virgule avant traitement et la 2ème cellule une liste de nom séparé par une virgule après traitement.

Je souhaite pouvoir comparer ces 2 cellules et dans les cas ou elles ne sont pas strictment égales faire apparaitre les differences dans une 3èmes cellule. Important, c'est seulement les noms presents dans la cellule 2 est non present dans la cellule 1 que je souhiate faire apparaitre.

Merci par avance de votre aide.

Bonjour,

Peux-tu joindre un fichier?

Cdlt.

Personne n'a d'idée ?

Bonjour.

Voici une façon de comparer la Colonne F avec la colonne E.

Sub tt()
For i = 4 To Range("F" & Rows.Count).End(xlUp).Row
diff = ""
 t = Split(Cells(i, "F"), ",")
 a = "," & Cells(i, "E") & ","

 For j = 0 To UBound(t)
   b = InStr(a, "," & t(j) & ",")
   If b = 0 Then
    diff = diff & "," & t(j)
  End If
 Next

 Cells(i, "H").NumberFormat = "@"
 Cells(i, "H") = Mid(diff, 2)

Next

End Sub

Cordialement

Docmarti

Super, ca fontionne selon ma demande . Merci beaucoup.

Merci du retour.

Heureux d'avoir pu t'aider

Docmarti