match value and copy to other colums

[BABAR RASHEE]

Dear All

I am seeking a macros i have a data of A1:A50 actual data should be match with "C" colums and remaining unmatch values should copy to Sheet2 ......

Pls help me to solve this issue "urgent"

Thanks

[BABAR RASHEE]

DEAR ALL

STILL I AM LOOKING FOR HELP FROM YOU PEOPLE....PLS HELP

[mdmackillop]

[VBA]Sub DoMatch()
Dim Cel As Range, c As Range
For Each Cel In Range("A1:A50")
Set c = Range("C:C").Find(Cel, , , xlWhole)
If c Is Nothing Then
Cel.Copy Sheets(2).Cells(Rows.Count, 1).End(xlUp).Offset(1)
End If
Next
End Sub
[/VBA]