Not a 100% sure which way the data are going but test:Sub blah() With Sheets("Base Sheet").Range("AE2:AE3541") .FormulaR1C1 = "=VLOOKUP(RC[-30],ottwafield!R1C1:R36C2,2,FALSE)" .Value = .Value .SpecialCells(xlCellTypeConstants, 16).ClearContents End With End Sub
p45cal
Everyone: If I've helped and you can't be bothered to acknowledge it, I can't be bothered to look at further posts from you.
Thanks Friend...its working fine ...major change was the data set was dynamic in nature.
the below code works for the above requirement...Appreciate your help on this...thank you .
Sub test()
Range("a2", Range("a" & Rows.Count).End(xlUp)).Columns("ae:af").Formula = _
"=iferror(vlookup($a2,ottwafield!$a:$b,column(a1),false),"""")"
EndSub
I needn't have bothered. You already had the answer.
You cross posted at Chandoo.org, which you do regularly… (as well as MrExcel at times) without providing links.
All forums have the same or similar rules on cross posting.
Have a read of: http://www.excelguru.ca/content.php?184
And please supply links in future.
Sure Friend ...sorry for the confusion.
Going Forward will supply links ...Apologies again