Compare cells of two columns excel 2007 [Solved/Closed]

- - Latest reply:  Rajen - Oct 31, 2013 at 02:10 PM
Hello,

I have two columns with identical cells and I need to find those that are not the same. For example: Column1 Cell1 = "a", Column2 Cell1 = "h". Column1 Cell2 = "h', Column2 Cell2="h", etc. I need to find which two cells are not the same. Thanks for any advice. Baruch.

See more 

3 replies

Best answer
Posts
1862
Registration date
Sunday June 14, 2009
Status
Contributor
Last seen
July 30, 2015
922
16
Thank you
in column 3 that is in C1 type or copy this formula

=IF(A1=B1,"same","not same")

copy C1 down.

see what you get.

Say "Thank you" 16

A few words of thanks would be greatly appreciated. Add comment

CCM 4460 users have said thank you to us this month

in row "A" suppose some 1-100 numbers are there in cell, like in "B" some of the numbers only will appear though they are from in between 1 to 100, some numbers will not be there . My question is that the numbers which are not identical in row "A" and "B" should appear in row "c". Pl help
Thanks Venkat
0
Thank you
good one
Posts
1862
Registration date
Sunday June 14, 2009
Status
Contributor
Last seen
July 30, 2015
922
0
Thank you
quote
buddi - Sep 17, 2013 11:19AM
in row "A" suppose some 1-100 numbers are there in cell, like in "B" some of the numbers only will appear though they are from in between 1 to 100, some numbers will not be there . My question is that the numbers which are not identical in row "A" and "B" should appear in row "c". Pl help
Link (#3)unquote

is this a new query by another person. it is better if the new querries are not introudced in anothers"s thread. also small extract of data is given and also whata resulot is expected.

suppose the first two rows are like this
1 2 3 4 5 6 7 8 9 10
1 3 5 7 9

try this macro

Sub tests()
Dim r As Range, c As Range, cfind As Range, r2 As Range
Set r = Range(Range("A1"), Range("A1").End(xlToRight))
Set r2 = Range(Range("A2"), Range("A2").End(xlToRight))
Range("A3").EntireRow.Delete
For Each c In r

Set cfind = r2.Cells.Find(what:=c.Value, lookat:=xlWhole)
If cfind Is Nothing Then
Cells(3, Columns.Count).End(xlToLeft).Offset(0, 1) = c

End If
Next c


End Sub