Comparer 2 cellules contenant une serie de chiffres et afficher differences

Dugenou

XLDnaute Barbatruc

• 25 Avril 2008

• #2

Re : Comparer 2 cellules contenant une serie de chiffres et afficher differences

Bonjour,

avec un petit exemple on comprendrait mieux

merci

 

Vote positif 0 Vote négatif

A

Atlanx

XLDnaute Nouveau

• 25 Avril 2008

• #3

Re : Comparer 2 cellules contenant une serie de chiffres et afficher differences

voila j'ai joins un fichier test contenant un exemple de mon casse tete

Merci

 

Pièces jointes

• TEST.xls

  13.5 KB · Affichages: 129
• TEST.xls

  13.5 KB · Affichages: 141
• TEST.xls

  13.5 KB · Affichages: 141

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 25 Avril 2008

• #4

Re : Comparer 2 cellules contenant une serie de chiffres et afficher differences

Bonjour,

Code:

Function Diff(cel1, cel2)
   Application.Volatile
   a = Split(cel1, ";")
   b = Split(cel2, ";")
   j = 1
   For i = LBound(a) To UBound(a)
     If IsError(Application.Match(a(i), b, 0)) Then
       temp = temp & a(i) & ";"
       j = j + 1
     End If
   Next i
   Diff = Left(temp, Len(temp) - 1)
End Function

JB
Formation Excel VBA JB

 

Pièces jointes

• Classeur2.xls

  22 KB · Affichages: 147
• Classeur2.xls

  22 KB · Affichages: 140
• Classeur2.xls

  22 KB · Affichages: 153

Vote positif 0 Vote négatif

A

Atlanx

XLDnaute Nouveau

• 25 Avril 2008

• #5

Re : Comparer 2 cellules contenant une serie de chiffres et afficher differences

Merci infiniment je vais de ce pas l'essayer

 

Vote positif 0 Vote négatif

A

Atlanx

XLDnaute Nouveau

• 29 Avril 2008

• #6

Re : Comparer 2 cellules contenant une serie de chiffres et afficher differences

Un grand merci à Boisgontier, j'ai gagné un temps fou
Par contre si quelqu un doit utiliser cette fonction, bien faire gaffe de bien formater le contenu des cellule et ne pas mettre d'espaces entre les chiffres ; le résultat est completement différent

 

Vote positif 0 Vote négatif