Hi,

Am Wed, 24 Sep 2014 11:32:04 -0700 (PDT) schrieb KK:

I have below code for vlookup from different sheets. The problem is the inner loop is not exiting after first condition is met. Like I am getting 3 lookups on the same field (JCell) please help

try:

Sub Test()
Dim JRng As Range

Set JRng = Sheets("Sheet2").Range("J8:J10")
With JRng
.Formula = "=VLOOKUP(Sheet3!D23,Sheet4!$M$1:$N$1000,2,0)"
.Copy
.PasteSpecial xlPasteValues
End With
End Sub


Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional