请问，怎样返回自定义函数向导生成的公式

[rinco]

在Cell3.0中可以在OnUserFuncGuide事件中返回自定义函数向导生成的公式
如下:
Private Sub Cell1_OnUserFuncGuide2(ByVal parent As Long, ByVal funcname As String, guidestring As String)
guidestring = frm_formula.ShowMe( vbModal, MDI_frame)
End Sub

Cell5.1中没有OnUserFuncGuide事件
有一个FuncGuide事件,但没有guidestring 参数
用以下又方法行不通，正确的方法是什么

Private Sub Cell1_FuncGuide(ByVal parentwnd As Long, ByVal name As String)
Cell1.SetFormula Cell1.GetCurrentCol, Cell1.GetCurrentRow, Cell1.GetCurSheet, frm_formula.ShowMe( vbModal, MDI_frame)
End Sub

[rinco]

SetFuncGuide （示例）
函数原型

void SetFuncGuide(LPCTSTR guidestr, long cursorpos)
我已经找到了
^_^


参数说明

guidestr 显示在公式输入框中的表达式。
cursorpos 鼠标光栅的位置
0 表示在表达式的开头；
-1 表示在表达式的末尾；
其它表示在表达式文本中的位置。
说明

用来在点击公式向导后设置公式输入栏中的文本内容，该方法只能在CalcFunc事件中使用。

[klbt]

祝贺楼主自力更生。