Microsoft provides programming examples for illustration only, without warranty either expressed or implied, including, but not limited to, the implied warranties of merchantability and/or fitness for a particular purpose. This article assumes that you are familiar with the programming language being demonstrated and the tools used to create and debug procedures. Microsoft support professionals 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 needs.
If you have limited programming experience, you may want to contact a Microsoft Certified Partner or Microsoft Advisory Services. For more information, visit these Microsoft Web sites:
Microsoft Certified Partners -
https://partner.microsoft.com/global/30000104Microsoft Advisory Services -
http://support.microsoft.com/gp/advisoryserviceFor more information about the support options that are available and about how to contact Microsoft, visit the following Microsoft Web site:
http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS
The following sets of steps show you how to create a simple custom function and display this function in step 2 of the Function Wizard with a macro.
Creating a Custom Function
To create a custom function, first close and save any open workbooks, and then follow these steps:
- Open a new workbook, and then start the Visual Basic Editor by pressing ALT+F11.
- On the Insert menu, click Module, and then 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, and then save this workbook as Test.xls.
Calling 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
multiplies x by y and then adds z (10*10+3).
Displaying the Custom Function with a Macro
To display the custom function with a macro, follow these steps:
- Start the Visual Basic Editor by pressing ALT+F11.
- 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
- On the File menu, click Close and Return to Microsoft Excel, and then save the workbook as Test.xls.
- On the Tools menu, point to Macro, and then click Macros.
- In the Macros dialog box, click to select CallStep2OfDialogWizard, and then click Run.
- Type the following numbers for the X, Y, and Z function arguments in
the wizard dialog box:
- Click OK.
Cell A1 should display the value 103, because the custom function
multiplies X by Y and then adds Z (10*10+3).