使用VBA Excel检查打开工作表复选框

Question

how I can check if a checkbox is selected ? And after selecting a checkbox for example "a" (in my example) I want to open a excel sheet.

How can I solve this problem? Thank you all.

Answer 1

In the UserForm module you can just place the following code, when your CheckBox is named "CheckBox1":

Private Sub CheckBox1_Click()
    If Me.CheckBox1.Value = True Then
        Worksheets("Sheet1").Visible = True
    Else
        Worksheets("Sheet1").Visible = False
    End If
End Sub

This will make "Sheet1" visible when it's checked and invisible when unchecked. If you name your checkbox differently, you'll see that if you double click the checkbox in the Userform Design, the VBE will already come up with

Private Sub CheckBoxName_Click()

End Sub