Dim FinalResult As Variant, Table_Range As Range, LookupValue As Range
Set Table_Range = Sheets("Requestor").Range("A:B")
Set LookupValue = Sheets("Tax Cert Bill").Range("B12")
' original code ' FinalResult = Application.WorksheetFunction.VLookup(LookupValue, Table_Range, 2, False)
' updated code ' FinalResult = Application.WorksheetFunction.VLookup([LookupValue], [Table_Range], 2, False)
On Error Resume Next
i tried both the original worked but when there is no match it give error 1004 i tried the on error resume next but still stops there. I also read
so tried with updated code when the On Error Resume Next did not work.
error
code being ran on this sheet
Looking name up on requestor page
any help would be great. thanks.
Set Table_Range = Sheets("Requestor").Range("A:B")
Set LookupValue = Sheets("Tax Cert Bill").Range("B12")
' original code ' FinalResult = Application.WorksheetFunction.VLookup(LookupValue, Table_Range, 2, False)
' updated code ' FinalResult = Application.WorksheetFunction.VLookup([LookupValue], [Table_Range], 2, False)
On Error Resume Next
i tried both the original worked but when there is no match it give error 1004 i tried the on error resume next but still stops there. I also read
VBA-Vlookup problem 'error 1004'
Private Sub GetRoomPrice_Click() Set PriceTable = Range("Prices") If RoomNR.Text = "" Then GoTo e RoomPrice = WorksheetFunction.VLookup(RoomNR.Text, PriceTable, 2)e: End Sub when i use this code in the button that is on my form i get the following error.. " Run-time error...
www.mrexcel.com
error
code being ran on this sheet
Looking name up on requestor page
any help would be great. thanks.