呼叫按钮单击使用按钮编号变量的模块

Question

我正在研究一个有近 200 个按钮的 Excel VBA 宏。我想在一个模块中使用点击事件。

我已经看到我必须将事件更改为公共并使用：

呼叫userform1.commandbutton1_Click 或 userform1.commandbutton1_Click

我想用变量更改按钮的编号以使用循环，但我不知道该怎么做。

我能够做到这一点，我想通过以下方式更改按钮属性：

用户表单1.Controls("commandbutton" & i(.caption = "test"，但它不适用于"_Click">

任何帮助都非常感谢

Answer 1

使用 Button 控件的Value属性：

Me.Controls("CommandButton" & i).Value = True