在对象浏览器的成员选项对话框中保存描述
Save Description in Member Options dialog box in Object Browser
我创建了一个具有一些功能的插件。当我尝试添加功能描述以提供屏幕提示时,它不会保存。
我尝试保存屏幕提示的图片。对象 Browser/MyLibrary/Right 单击函数和 select 属性
有一种方法可以在键入公式时显示公式参数,就像在调用本机函数时一样。
您可以在用户按下 Ctrl + A
时显示参数。
https://wellsr.com/vba/2017/excel/vba-macrooptions-to-add-udf-description/
这是一个示例,说明如何注册用户定义函数的详细信息,以启动包含工具提示的公式向导。
Sub RegisterUDF()
Dim strFunc As String 'name of the function you want to register
Dim strDesc As String 'description of the function itself
Dim strArgs() As String 'description of function arguments
'Register Linterp linear interpolation function
ReDim strArgs(1 To 3) 'The upper bound is the number of arguments in your function
strFunc = "Linterp"
strDesc = "2D Linear Interpolation function that automatically picks which range " & _
"to interpolate between based on the closest KnownX value to the NewX " & _
"value you want to interpolate for."
strArgs(1) = "1-dimensional range containing your known Y values."
strArgs(2) = "1-dimensional range containing your known X values."
strArgs(3) = "The value you want to linearly interpolate on."
Application.MacroOptions Macro:=strFunc, _
Description:=strDesc, _
ArgumentDescriptions:=strArgs, _
Category:="My Custom Category"
End Sub
我创建了一个具有一些功能的插件。当我尝试添加功能描述以提供屏幕提示时,它不会保存。
我尝试保存屏幕提示的图片。对象 Browser/MyLibrary/Right 单击函数和 select 属性
有一种方法可以在键入公式时显示公式参数,就像在调用本机函数时一样。
您可以在用户按下 Ctrl + A
时显示参数。
https://wellsr.com/vba/2017/excel/vba-macrooptions-to-add-udf-description/
这是一个示例,说明如何注册用户定义函数的详细信息,以启动包含工具提示的公式向导。
Sub RegisterUDF()
Dim strFunc As String 'name of the function you want to register
Dim strDesc As String 'description of the function itself
Dim strArgs() As String 'description of function arguments
'Register Linterp linear interpolation function
ReDim strArgs(1 To 3) 'The upper bound is the number of arguments in your function
strFunc = "Linterp"
strDesc = "2D Linear Interpolation function that automatically picks which range " & _
"to interpolate between based on the closest KnownX value to the NewX " & _
"value you want to interpolate for."
strArgs(1) = "1-dimensional range containing your known Y values."
strArgs(2) = "1-dimensional range containing your known X values."
strArgs(3) = "The value you want to linearly interpolate on."
Application.MacroOptions Macro:=strFunc, _
Description:=strDesc, _
ArgumentDescriptions:=strArgs, _
Category:="My Custom Category"
End Sub