Improve company productivity with a Business Account.Sign Up
Sheet1.Cells(nRow, 4) = WorksheetFunction.VLookup(ActiveSheet.Range("c4"), Worksheets("lookup").Range("e:e"), 2, 0)
Open in new window
Need expert help—fast? Use the Help Bell for personalized assistance getting answers to your important questions.
varMatch = Application.Match(sheet1.cells(nRow, "C").Value, Worksheets("Lookup").Range("E:E"),0)
if not iserror(varmatch) then
Sheet1.Cells(nRow, 4).value = Worksheets("Lookup").Cells(varMatch, "D").Value
varMatch = Application.Match(CDbl(sheet1.cells(nRow, "C").Value), Worksheets("Lookup").Range("E:E"),0)
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Please enter a first name
Please enter a last name
Must be at least 4 characters long.
Join and Comment
The results are in! Meet the top members of our 2017 Expert Awards. Congratulations to all who qualified!