Error on Button when no Value on Vlookup

[Lexian]

Hi,

I have a simple spreadsheet that uses Vlookup.


I used a textbox to search a data, use a button to search, then display the value on a label
it works okay, but when I search and value is not found.. I received an error when I clicked the button

"Run-time error '13':
Type mismatch



This is my code:

Private Sub CommandButton1_Click()
Sheets("Summary").Range("A3") = TextBox1.Value
Label1.Caption = Sheets("Summary").Range("A4")
Label3.Caption = Sheets("Summary").Range("A5")
End Sub


I'm planning to display "Record not Found" if no value is found on the search.


Thanks in advance
-L

[Keebellah]

At which point in your code do you get the error?
It's a mismatch, so much is clear but which variable?
Your code (incorrectly posted since you omitted the code tags) does not tell me (us) anything

[Lexian]

Hi, thanks for the reply,

the error occurs when the item I searched is not on the list. on Excel it will only display N/A, but when it run it using vba, button, text.. it received the error.

Please Login or Register  to view this content.

[Lexian]

Please Login or Register  to view this content.

the label1 is highlighted in yellow when I occurs the error

[Lexian]

Here is the sample Spreadsheet.

On Sheet "Summary", there is a textbox, Button and Label. The Vlookup formula are found on A3,A4,A5. and these values display on Label.

On sheet "Data", this is where the data are searched. ID numbers are on column C, if you search the correct ID#, it returns the values correctly, But when the ID# is incorrect it shows me error.
I would like to code it that when you enter incorrect ID#, it will display on the label "Record not Found"


Sincererely
-L

[bakerman2]

Try this way.

Please Login or Register  to view this content.

[Keebellah]

You have add an error trap, something like on error resume next
After that line you check if Err.number > 0 that means there is an error, just like the way you would in a normal formula
I’m writing this on my phone so no excel at hand but it’s just to give you an idea

[Lexian]

Try this way.

Please Login or Register  to view this content.

Hi thank you for the reply.
It only shows record not found even the input is correct

[bakerman2]

Oeps, don't know what went wrong here.

Please Login or Register  to view this content.

[Lexian]

Hi, That works smoothly.

Thanks for the assistance all. it helps me a lot.

+1 Rep

[bakerman2]

Glad to help and sorry again for the mixup.

Thanks for rep+.