Could you please attach one example of using the function i.e. left lookup
function using the user defined function.
Regards,
C.G.Kumar
_
From: excel-macros@googlegroups.com [mailto:excel-mac...@googlegroups.com]
On Behalf Of Paul Schreiner
Sent: Thursday, October 29, 2009 8:09 PM
To: excel-macros@googlegroups.com
Subject: $$Excel-Macros$$ Re: Help with user defined function
The problem is with the LOCATION of your UDF.
VBA itself will look in Personal.xls and Personal.xlsb,
but the Excel worksheet is NOT.
If you had a sheet called "Sheet1" and another called "Sheet2",
and you wanted the cell B4 of Sheet1 to display the contents
of cell C10 of Sheet2, you couldn't use:
=C10 in B4, because it would show you the contents of C10
in the CURRENT SHEET.
You would have to use: =Sheet2!C10
so that Excel knows WHERE the cell is located.
the same thing applies to Functions.
the worksheet looks in standard Excel functions, then
in the functions defined in the CURRENT WORKBOOK.
but it doesn't automatically go looking in other workbooks.
What you need to do is EITHER
put the function in the workbook where you intend to use it,
or..
use the Function Wizard to add the formula to the cell.
the last category entry of the Function Wizard is "User Defined".
You'll find that the function is inserted as:
=PERSONAL.XLS!VLOOKNEW(.
Paul
_
From: Mayank
To: excel-macros@googlegroups.com
Sent: Thursday, October 29, 2009 9:23:50 AM
Subject: $$Excel-Macros$$ Help with user defined function
Dear friends,
I HAVE FOUND THIS USER DEFINED VLOOKUP FUNCTION WHICH FIND THE RESULT FROM
LEFT SIDE.
CAN ANYONE HELP WITH THIS USER DEFINED FUNCTION, DONT KNOW WHY THIS IS NOT
WORKING WHEN I PASTE THIS CODE IN MODULE OF MY PERSONAL WORKBOOK. IT IS
GIVING ERROR #NAME?
Function VLOOKNEW(lookup_value, table_array As Range, _
col_index_num As Integer, CloseMatch As Boolean)
Dim nRow As Long
Dim nVal As Integer
Dim bFound As Boolean
VLOOKNEW = "Not Found"
If col_index_num > 0 Then
VLOOKNEW = Application.WorksheetFunction.VLookup(lookup_value, _
table_array, col_index_num, CloseMatch)
Else
nRow = Application.WorksheetFunction.Match(lookup_value, _
table_array.Resize(, 1), CloseMatch)
VLOOKNEW = table_array(nRow, 1).Offset(0, col_index_num)
End If
End Function
Please send me the solution.
I wud appreciate if u can mark the solution to mkpat...@gmail.com
Regards
Mayank Patel
ITC LTD
9822978041
9422749110
--~--~-~--~~~---~--~~
--
Some important links for excel users:
1. Excel and VBA Tutorials(Video and Text), Free add-ins downloads at
http://www.excelitems.com
2. Excel tutorials at http://www.excel-macros.blogspot.com
3. Learn VBA Macros at http://www.vbamacros.blogspot.com
4. Excel Tips and Tricks at http://exceldailytip.blogspot.com
To post to this group, send email to excel-macros@googlegroups.com
If you find any spam message in the group, please send an email to:
Ayush Jain @ jainayus...@gmail.com or
Ashish Jain @ 26may.1...@gmail.com
<><><><><><><><><><><><><><><><><><><><><><>
HELP US GROW !!
We reach over 6,500 subscribers worldwide and receive many nice notes about the
learning and support from the group. Our goal is to have 10,000 subscribers by
the end of 2009. Let friends and co-workers know they can subscribe to group at
http://groups.google.com/group/excel-macros/subscribe
-~--~~~~--~~--~--~---
