使用Application.MacroOptions方法为自定义函数添加说明,以方便用户在使用时获取相应的帮助信息
码
Option Explicit
Function MyArea(radius As Double) As Double
MyArea = WorksheetFunction.Pi * radius ^ 2
End Function
'添加说明
Sub 添加说明()
Application.MacroOptions _
macro:="MyArea", _
Description:="本函数用于计算圆面积", _
Category:=3, _
argumentdescriptions:=Array("输入圆半径")
End Sub
首先执行“添加说明”宏。 然后,单击编辑栏左侧的“fx"按钮添加函数,选择“数学与三角函数”,在其中找到“MyArea”函数,单击“确定”按钮。在“函数参数”窗口中可以看见详细的参数
说明。
Application. MacroOptions方法
Application. MacroOptions方法可以用来设置“宏选项”中的信息,也可以用来设置自定义函数的说明,其语法为
Application.MacroOptions(Macro,Description,HasMenu,MenuText,HasShortcutKey,ShortcutKey,Category, StatusBar, Help