选中一个框会取消选中Excel中的相邻框

Question

我目前正在尝试编写一个代码，该代码可以遍历所有复选框，如果旁边的复选框被选中，则取消选中它。

目前，我已经写了一些东西，而且我知道它离我需要的东西不远。我知道如何按框单独进行操作：

Private Sub CheckBox1_Click()
   If CheckBox1.Value = True Then
       CheckBox2.Value = False
   End If
End Sub
Private Sub CheckBox2_Click()
 If CheckBox2.Value = True Then
    CheckBox1.Value = False
 End If
End Sub

但是，我要编写几百行复选框，因此，如果我可以循环遍历这些复选框，那将是救生员！所以我开始：

Dim i As Integer
i = 1
a = 2
If CheckBoxi.Value = True Then
    CheckBoxa.Value = False
End If
If CheckBoxa.Value = True Then
    CheckBoxi.Value = False
End If
i = i + 2
a = a + 2
End

但是，这似乎不起作用，我也不知道从这里去哪里。任何帮助将不胜感激！