Il n'existe apparemment pas de fonction embarquée qui mette en évidence les différence entre deux Chaine de caractère. Par exemple:
Str1="Quel beau string, c'est un ficelle."
Str2="Quel beau string, mais c'est un tanga."
donnerai comme résultat:
Resultat: "Quel beau string, mais c'est un tanga."
Pensez vous que c'est possible? J4ai commencé à faire une comparaison caractère par caractère mais quand il y a plus d'une différence mon système pour mettre en bold ne fonctionnera pas avec ce système...

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
    ActiveCell.FormulaR1C1 = "Ceci est un test de couleur"
    With ActiveCell.Characters(Start:=1, Length:=12).Font
        .Name = "Calibri"
        .FontStyle = "Normal"
        .Size = 11
        .ThemeColor = xlThemeColorLight1
    End With
    With ActiveCell.Characters(Start:=13, Length:=4).Font
        .FontStyle = "Gras"
        .Color = -16711681
    End With
    With ActiveCell.Characters(Start:=17, Length:=11).Font
        .Name = "Calibri"
        .FontStyle = "Normal"
        .Size = 11
        .ThemeColor = xlThemeColorLight1
    End With
Je sais donc comment colorer mes différence, j'ai plus de problème pour savoir comment logger toutes mes coordonnées start et length de chaque erreur...

Quelqu'un a une idée?
D'avance merci