Hi
I need to compare two columns in different excel sheet.lyk Workbook1->sheet1->Column A with another workbook Workbook2->Sheet1->Column A and if the values in the two columns matches the value of Workbook2->sheet1>Column C values should be copied into Workbook1->sheet1->ColumnC..
Sub COMPARISON()
Dim RC, RC1
Dim W2 As Workbook ' , W1 As Workbook
Dim i As Long, j As Long
'Set W1 = Workbooks.Open("D:\SM\SM.xlsm")
Set W2 = Workbooks.Open("D:\SM\SM1.xlsm")
For Each RC In Range("A1")
If RC = ActiveWorkbook.Sheets(4).Range("A1").Value Then _
Set RC1 = ActiveWorkbook.Sheets("Sheet4").Range("C1").Value
Range("C1").Value = RC1
Next
End Sub
I have tried my level best with this code.but i didnt the exact result which i need .Can Anyone plz help to overcome this problem.
Thanks in advance
Bookmarks