First select the data you want compared.  Then use this script:

dim r as long
dim c as long

for r = 1 to selection.rows.count
    if (selection.cells(r,1).value = selection.cells(r,2).value) then
         for c = 1 to 2
              selection.cells(r,c).interior.colorindex = 3
              selection.cells(r,c).interior.pattern=xlSolid
          next c
     end if
next f

Hope this helps
Dom

No need for a macro; can be done using Format | Conditional Formatting with
Formula is =A2=A3
best wishes

What you desire can be easily accomplished with the Excel feature called
Conditional Formatting......no macro required.
First, highlight cells A1 and A2, then do Format > ConditionalFormat > then
in the left window select "Formula is" and in the right window type the
formula
=AND(SUM(A$12:A$13)>0,A$12=A$13), then select the Format button on the
pop-up and choose the Patterns Tab, and click on a Green square, then ok >
ok,  Then, highlight the same two cells and select the FormatPainter icon in
the upper toolbar, (the little paintbrush), and drag it across all the cells
you wish to format the same.......ie, your 70 columns.  This will  make the
cells turn green if they are matching in value and ARE NOT ZERO, OR
EMPTY.......

hth
Vaya con Dios,
Chuck, CABGx3