用户窗体上的 Excel VBA 多复选框控件答案

【问题标题】：Excel VBA multi-chechbox control on userform用户窗体上的 Excel VBA 多复选框控件
【发布时间】：2023-03-10 17:10:01
【问题描述】：

我对用户窗体上的复选框控件感到困惑。我必须控制表单中所有复选框的值，并根据这些值采取行动。例如，如果 cb(checkbox) 1,2 和 3 为 True，则 excel 将执行操作 A。如果 cb 2,4 和 5 为真，则 excel 将执行操作 B 等等……

如果没有那么多 if 语句，如何控制多个复选框值？

【问题讨论】：

您必须使用 If 语句或 Select...Case 语句来处理取决于复选框的作用。复选框的实际作用是什么？
@AndyW 它们仅用于控制目的。

标签： vba excel checkbox

【解决方案1】：

您可以使用以下伪代码：

With Me
    Select Case True
        Case .CheckBox1 And .CheckBox2 And .CheckBox3
            ' action A
        Case .CheckBox2 And .CheckBox4 And .CheckBox5
            ' action B
        Case ... ' other cases
            ' corresponding action

        Case Else ' if no preceeding cases are met
            ' default action
End With

【讨论】：

太棒了！我不知道你能做到这一点。
@user3598756 是否可以在“案例”块中放置更多控制案例？