More information would be helpful. This MAY do what you want:
Sub Compare2Shts()
For Each Cell In Worksheets("Sheet1").UsedRange
If Cell.Value <> Worksheets("Sheet2").Range(Cell.Address) Then
Cell.Interior.ColorIndex = 3
End If
Next
For Each Cell In Worksheets("Sheet2").UsedRange
If Cell.Value <> Worksheets("Sheet1").Range(Cell.Address) Then
Cell.Interior.ColorIndex = 3
End If
Next
End Sub
--
Ryan---
If this information was helpful, please indicate this by clicking ''Yes''.
"Per Jessen" wrote:
> Hi
>
> We need some more information.
>
> Do your want to compare two sheets in same workbook or maybe multiple sheets
> in two workbooks?
>
> How are your data layout, ie which columns and rows needs to be compared. Do
> you want to compare cell by cell or row by row.
>
> Shall only a single cell be highligheted, or maybe the entire column.
>
> Regards,
> Per
>
> "compare xl" <compare (E-Mail Removed)> skrev i meddelelsen
> news:3076DFC5-23A2-47C7-AB12-(E-Mail Removed)...
> > Hi,
> >
> > I would like to have a macro that will compare the contents of two excels
> > and return the difference in terms of red colors in the target excel.
> >
> > Thanks in advance,
> > Santanu
>
>