vlookup

[laurensims41]

I have a user form that I would like a user to input a 3 digit number into a text box and then lookup that number on a different sheet and then paste that value from the second sheet to a final sheet.

THis is the code I have so far and it is not working.

Code: Select all

Sheets("FinishedSheet").Cells(1,7)=Application.WorksheetFunction.Vlooup(tbsitenumber.value,Worksheets("OAM").Range("A9:M1500").Value,13)

.

tbsitenumber.value is the name of the text box on my form.

This command line keeps returning a run - time error of '1004;" Unalbe to get the VLookup property of the Worksheet Function Class.

[pecoflyer]

Please wrap code with tags - Thx

[NoSparks]

Try VBA's Range.Find Method

[Sisyphus]

Perhaps it's just the typo in the function's name. Vlooup is missing a k.
Otherwise, look at the data type of the lookup value. Tbx.Value returns a string, even though it appears to be numeric. If you have numbers in column A, that could be the reason, and converting the Tbx.Value to a numeric value could be the cure.
As a matter of principle, I suggest splitting the final line of code into several components for testing purposes so that you can see where the error occurs. Start by testing the VLookup function on the worksheet. Then assign the Tbx.Value to a variable and issue the lookup to a MsgBox or Immediate Window. Once everything works fine you can put it back into a single line of code.