如何获取自定义功能区编辑框editBox控件中输入文本的值？

如下图所示

在自定义功能区编辑框（editBox）控件中输入了牛散的名字，如果想要在vba代码中获得这个输入的文本的值。

需要用到editBox控件的onChange属性，在onChange属性中指定回调函数的名称，然后在回调函数中获取输入的文本的值。

editBox控件的onChange属性的回调函数如下所示：

Sub xyf(control As IRibbonControl, text As String)
    'text参数就是editBox编辑框控件中输入的文本
   sText = text
End Sub

如果想要使输入的文本的值可以让不同的过程调用，可以定义一个公共变量，然后将text参数的值赋值给公共变量。

Public sText As String
'Callback for editBox1 onChange
Sub xyf(control As IRibbonControl, text As String)
    'text参数就是editBox编辑框控件中输入的文本
   sText = text
End Sub