Compare strings in cells and highlight difference

I am new to Macros and I have failed to write one to compare 2 cells
and highlight the difference between the strings in those cells. The
one tried highlighted the whole cell instead.

Compare string in column B to Column A and return the different
character in column C and the position of that character in column D.
This must be possible for multiple characters/positions. Is it possible
to highlight (bold/different colour) the different character as well.
For example:-

A B C D
1 A6ABC A67ABC 7 3
2 A7ABC A557ABC 5, 5 2, 3
3 12AAC R126AAC R, 6 1, 4
4 D4CBT LF04CBT L, F,0 1, 2, 3
5 2811D 28MD M 3


Thanking you in advance,

Odin

Hi odin,

For the first row in your example the code is this:

Range("B1").Select
ActiveCell.Characters(Start:=Range("D" & ActiveCell.Row),
Length:=1).Font.FontStyle = "Bold"

Try to write a macro based on this code to do the whole job!

Regards,
Stefi

„Odin” ezt �*rta:

> I am new to Macros and I have failed to write one to compare 2 cells
> and highlight the difference between the strings in those cells. The
> one tried highlighted the whole cell instead.
>
> Compare string in column B to Column A and return the different
> character in column C and the position of that character in column D.
> This must be possible for multiple characters/positions. Is it possible
> to highlight (bold/different colour) the different character as well.
> For example:-
>
> A B C D
> 1 A6ABC A67ABC 7 3
> 2 A7ABC A557ABC 5, 5 2, 3
> 3 12AAC R126AAC R, 6 1, 4
> 4 D4CBT LF04CBT L, F,0 1, 2, 3
> 5 2811D 28MD M 3
>
>
> Thanking you in advance,
>
> Odin
>
>