Excel中互斥checkbox（切换）

我有电子表格与表格工具栏中的50多个checkbox。 在less数情况下，您只能从一个组中选中1个checkbox，即从checkbox1选中一个checkbox到checkbox5。

我试图实现这个没有任何代码，如果可能的话。 选项button不是首选，因为我想要一个统一的电子表格。

如何将checkbox1分组到checkbox5，以便它们成为组的互斥。

谢谢

Answer 1

您可能希望使用单选button，可能在组之间有分隔符，因为这也意味着最终用户这些字段是互斥的。

按照定义，单选button在组内是互斥的。

请记住，在你应该使用无线电广播的地方使用checkbox会让你的最终用户感到困惑，因为他们想知道为什么这个checkbox会突然失效，而使用单选button的时候混淆因素是不存在的。

Answer 2

如果你不能使用选项button，试试这个代码

Private Sub CheckBox1_Change() With Me.CheckBox1 If .Value Then ClearGroup .GroupName, .Name End With End Sub Private Sub CheckBox2_Change() With Me.CheckBox2 If .Value Then ClearGroup .GroupName, .Name End With End Sub Private Sub CheckBox3_Change() With Me.CheckBox3 If .Value Then ClearGroup .GroupName, .Name End With End Sub Private Sub ClearGroup(sGroup As String, sName As String) Dim ole As OLEObject For Each ole In Me.OLEObjects If TypeName(ole.Object) = "CheckBox" Then If ole.Object.GroupName = sGroup And ole.Name <> sName Then ole.Object.Value = False End If End If Next ole End Sub 

Answer 3

你为什么认为选项（收音机）button是互斥的？ 我有一个小组中有两个。 当我点击其中一个，另一个打开。 而且无法取消select它们。 他们最初是按照预期工作的，但是当我用另外两个选项button创build另一个不相关控件的链接框时，奇怪的行为开始了。 到目前为止，我所能做的最好的是每个控制组合和无组的单独单选button。