Macro Boxes

[Peter]

Here is the code that was used to create the color cell macro:

Sub auditt()
Dim sh1 As Worksheet, sh2 As Worksheet
Set sh1 = Sheets("12 Original")
Set sh2 = Sheets("12 Final")
For Each r In sh1.UsedRange
v1 = r.Value
rr = r.Row
cc = r.Column
v2 = sh2.Cells(rr, cc).Value
If v1 <> v2 Then
sh2.Cells(rr, cc).Interior.ColorIndex = 36
End If
Next

End Sub

It would be great if we could toggle this to make it turn on/off by pressing
the button.

Thanks.