Help To Speed Up Macro

[Dazzawm]

I was given this macro to highlight in red what is on sheet 2 but not on sheet 1 . I know there is not a lot to it but I was wondering if it could be speeded up in anyway as I several thousand cells to be checked and it does take quite a long time. Do I just have to be patient? Thanks

Sub dazzawm()
Dim c As Range, Found As Range
With Sheets("Sheet2")
For Each c In .UsedRange
Set Found = Sheets("Sheet1").UsedRange.Find(what:=c.Value)
If Found Is Nothing Then c.Interior.ColorIndex = 3
Next c
End With
End Sub

 

[JazzSP8]

Could try switching off screen updates...

Application.ScreenUpdating = False

Put that before your DIM and you should see an improvement

 

[Dazzawm]

Could try switching off screen updates...

The screen doesn't flicker or update or anything all I see is the hour glass.