在以前的文章,我们曾经介绍了《excel自定义函数添加和使用方法》。当excel内置函数不能或者不适合自己使用时,有能力可以编写自定义函数来解决实际问题。
当自己编写了一个自定义函数之后,为了让其余的人知道并了解自定义函数的相关参数用法,我们就可以为excel自定义函数添加功能说明。
下面我们以一个关于小写数字转大写数字的自定义函数来说明如何为excel自定义函数说明。
excel自定义函数说明文字,可以使用 Application.MacroOptions 方法来写。
下面是上面截图DA自定义函数相关的VBA代码:
Function DA$(num As Long, mType As Byte)
If mType <> 1 And mType <> 2 Then
DA = ""
Exit Function
End If
DA = Application.Text(num, "[DBNum" & mType & "]")
End Function
Sub 按钮1_Click()
Application.MacroOptions Macro:="DA", Description:="说明:把数字转换为中文大小写数字,mType 为1时,中文小写数字,为2时,中文大写数字。"
ActiveCell.Formula = "=DA()"
Application.Dialogs(xlDialogFunctionWizard).Show
End Sub
其中的代码说明:Application.MacroOptions Macro:="DA", Description:="说明:把数字转换为中文大小写数字,mType 为1时,中文小写数字,为2时,中文大写数字。"
上面这段文字就是excel自定义函数说明文字。
核心关注:拓步ERP系统平台是覆盖了众多的业务领域、行业应用,蕴涵了丰富的ERP管理思想,集成了ERP软件业务管理理念,功能涉及供应链、成本、制造、CRM、HR等众多业务领域的管理,全面涵盖了企业关注ERP管理系统的核心领域,是众多中小企业信息化建设首选的ERP管理软件信赖品牌。
转载请注明出处:拓步ERP资讯网http://www.toberp.com/
本文标题:excel自定义函数说明文字的添加方法