从用户窗体调用 RibbonControl 函数

Question

我最近问了一个关于如何在 MS Word 中制作动态工具栏的问题，我终于可以使用了。但是我有一组在用户窗体中生成的变量，我想从中调用父模块中的函数以使 UI 无效，以便根据用户窗体中输入的信息刷新按钮的可见性.

在用户窗体中，我有以下内容，其中我是动态循环的 for 循环的一部分：

Call Reintialise ("emailCheck"&i)

然后在模块中我有

Sub Reintialise(control As IRibbonControl, check As String)
   IRibbon.InvalidateControl (check) 
End Sub

我收到错误：'Argument not optional' 我知道这是因为函数调用中没有两个参数，但我不确定要为控制输入什么，1，真，将其留空都是类型不匹配

非常感谢，

Answer 1

将Nothing作为控制参数传递将触发该方法。

Reintialise Nothing, "emailCheck" & i

Calling a RibbonControl function from a userform