Creating a new function which can handle cell references

Hi

i was attempting to create a new function using VBA. However i am unable to run it successfully. The most probable reason from my end is my inability to pass the cell references correctly.

Here's the long function that i want to transform into a new function.

Please Login or Register  to view this content.

This function is actually used to lookup a value corresponding to given parameters

Sample Table:

Model	Company	Price
1	2	3
iPad	Apple	1000
Galaxy	Samsung	2000
Lumia	Nokia	3000

The resultant new function should be something like

Please Login or Register  to view this content.

I have written the VBA code for the same as

Please Login or Register  to view this content.

This code doesn't return any compile error. However, when used the only value it returns is "0"

Pls advise on the corrections required.

Thanks so much

I have not made any real changes but the below function works in my workbook

Please Login or Register  to view this content.

I have created the table as per your example and when I try "=value_find("Galaxy",A1:C4,"Price")" it works without a problem and returns 2000