excel - Excel 2013 中自定义工具栏中的编辑控件文本为空白

Question

我在工具栏上有一个带有 vba 编辑控件的 Excel 插件。这在 Excel 2003-2010 下工作了很长时间。但在 Excel 2013 下，无论在编辑控件中键入什么内容，文本属性始终为空。代码类似于下面的代码。

如果我将插件加载为 .XLS，它就可以工作。但是，如果我将它保存为 .XLA 并尝试，那么它会失败。

Sub test()
    Set myControl = CommandBars("test").Controls.Add(Type:=msoControlEdit)
With myControl
    .Caption = Search
    .OnAction = "tester"
End With
End Sub

Sub tester()
  MsgBox "I am gonna serach for: " & CommandBars("Test").Controls(1).Text 
  CommandBars("Test").Controls(1).Text = ""
End Sub