Microsoft KB Archive/189166

= XL98: How to Display Custom Function in Function Wizard Step 2 =

Article ID: 189166

Article Last Modified on 6/17/2005

-

APPLIES TO


 * Microsoft Excel 98 for Macintosh

-



This article was previously published under Q189166





SUMMARY
In Microsoft Excel 98 Macintosh Edition, you can create a custom Microsoft Visual Basic for Applications function to perform calculations. By default, this custom function will appear in the Function Wizard under the function category called "User Defined". You can call custom functions with the Function Wizard in Microsoft Excel just as you call built-in functions. However, there may be times when you want to use a Visual Basic for Applications macro to bypass step 1 of the Function Wizard and display a particular custom function in step 2 of the wizard. This article will demonstrate how to automatically show step 2 of the Function Wizard with a macro and have it populated with your custom function.



MORE INFORMATION
Microsoft provides programming examples for illustration only, without warranty either expressed or implied. This includes, but is not limited to, the implied warranties of merchantability or fitness for a particular purpose. This article assumes that you are familiar with the programming language that is being demonstrated and with the tools that are used to create and to debug procedures. Microsoft support engineers can help explain the functionality of a particular procedure, but they will not modify these examples to provide added functionality or construct procedures to meet your specific requirements. The following steps show you how to create a simple custom function and display this function in step 2 of the Function Wizard with a macro.

Create a Custom Function
To create a custom function, follow these steps:

 Close and save any open workbooks, and open a new workbook. Start the Visual Basic Editor by pressing OPTION+F11. On the Insert menu, click Module.  Type the following code into the module sheet: Function MyFunction(x As Integer, y As Integer, z As Integer) As Long

MyFunction = x * y + z

End Function  On the File menu, click "Close and Return to Microsoft Excel". Save this workbook as Test.xls.</li></ol>

Call the Function From Within the Workbook
To call this function from within Test.xls, type the following formula in cell A1 on Sheet1: =myfunction(10,10,3) Cell A1 should display the value 103, because the custom function multiplied x by y and added z (10*10+3).

Display the Custom Function With a Macro
In order to display the custom function with a macro follow these steps:

<ol> Start the Visual Basic Editor by pressing OPTION+F11.</li>  Type the following code into the module sheet: Sub CallStep2OfDialogWizard

' Set location for the function. With Worksheets("Sheet1").Range("A1")

' Select cell A1. .Select

' Place custom function in cell. .Formula = "=myfunction" End With

' Display step 2 of Function Wizard. Application.Dialogs(xlDialogFunctionWizard).Show

End Sub </li> On the File menu, click "Close and Return to Microsoft Excel".</li> Save the workbook as Test.xls.</li> On the Tools menu, point to Macros, and click Macros. In the Macros dialog box, click to select "CallStep2OfDialogWizard", and then click Run.</li> Type the following numbers for the X, Y, and Z function arguments in the wizard dialog:

X: 10

Y: 10

Z: 3

</li> Click Ok.</li></ol>

Cell A1 should display the value 103, because the custom function multiplied x by y and added z (10*10+3).

<div class="references_section">