I have one sheet which has some values and i have some values which has some datas in another sheet.Now i have written some macros to paste the
values from workbook 1 and 2 to workbook 3.It is working fine for me.But it produce the results for First in the 3rd sheet.Now i want to get all the colums results for my code
Kindlu help me.
values from workbook 1 and 2 to workbook 3.It is working fine for me.But it produce the results for First in the 3rd sheet.Now i want to get all the colums results for my code
Kindlu help me.
Code:
Sub Macro1()
'
' Macro1 Macro
'
' Keyboard Shortcut: Ctrl+l
Dim iColN As Integer
Dim iColI As Integer
Sheets("SIT1").Select
Columns("B:B").Select
Selection.Copy
Sheets("Result").Select
Columns("A:A").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Sheets("PROD1").Select
Columns("B:B").Select
Selection.Copy
Sheets("Result").Select
Columns("B:B").Select
ActiveSheet.Paste
Range("C2").Select
Application.CutCopyMode = False
lRow = Range("A30000").End(xlUp).Row
ActiveCell.FormulaR1C1 = "=EXACT(RC[-1],RC[-2])"
Range("D2").Select
ActiveCell.FormulaR1C1 = _
"=IF(ISERROR(VLOOKUP(RC[-2],C[-3],1,FALSE)),""Not Found"",""Found"")"
Range("D3").Select
End Sub