启用其他checkbox的主checkbox

你好,我不知道如何做一个checkbox激活 excel 2010中的其他checkbox。

在这里输入图像说明

我的意思是如果我检查第一个checkbox使其他checkbox。

这里是简短的例子 将名为MasterCheckBox的checkbox添加到您的表单中。 如果需要,使用UserFormEnableEvents以用户forms压缩事件。

 Option Explicit Private UserFormEnableEvents As Boolean Private Sub UserForm_Initialize() UserFormEnableEvents = True End Sub Private Sub MasterCheckBox_Change(): On Error GoTo Err_handler Dim userFormControl As Control UserFormEnableEvents = False For Each userFormControl In Me.Controls If (TypeOf userFormControl Is MSForms.CheckBox And _ userFormControl.Name <> MasterCheckBox.Name) Then userFormControl.Value = Not userFormControl.Value End If Next Err_handler: If (Err.Number <> 0) Then MsgBox Err.Description UserFormEnableEvents = True End Sub 

在这里输入图像说明