PDA

View Full Version : match value and copy to other colums



BABAR RASHEE
02-19-2008, 10:54 AM
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
02-20-2008, 05:48 AM
DEAR ALL

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

mdmackillop
02-20-2008, 12:21 PM
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