1

我在用户窗体上有选项按钮组,需要验证每个组中至少有一个选项按钮已被单击。有没有办法在不单独检查每个按钮的值的情况下做到这一点?可以整体引用选项按钮组吗?

4

1 回答 1

0

另一种方法是在加载时为每个组设置一个默认值。这样就没有循环,没有额外的公共变量,也没有理由验证组中的选项按钮是否已被勾选。

编辑显示示例(我也承认这也是一个笨拙的黑客):

如果您不反对使用一系列单元格来保存值,则可以使用选项按钮的“ContolSource”属性并将其设置为单元格。就像是:

Private Sub UserForm_Initialize()
    Sheet1.Range("A:B").Delete
' Group 1
    OptionButton1.ControlSource = "Sheet1!A1"
    OptionButton2.ControlSource = "Sheet1!A2"
' Group 2
    OptionButton3.ControlSource = "Sheet1!B1"
    OptionButton4.ControlSource = "Sheet1!B2"
End Sub

现在您可以计算每列中具有值的单元格的数量。如果一列至少有 1 个值,那么您知道该组的选项按钮已被勾选

于 2013-04-12T13:04:52.660 回答