用户窗体上的Excel VBA多Chechbox控件

我很困惑用户forms的checkbox控件。 例如，如果cb（checkbox）1,2和3是True，那么excel将执行操作A.如果cb 2,4和5是不错，那么Excel会做行动B等等…

我怎样才能控制多个checkbox值没有这么多的if语句？

Answer 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