Error Checking Multiple Checkboxes in a Userform

Hello all,

I am creating a userform that includes 10 different checkboxes. I want to create a quality check in my vba code that confirms with the user that if none of the checkboxes are marked that they actually want to continue when they click the enter button. I know I can probably use an IF AND statement along the lines of:

If .Checkbox1.Value = False And .Checkbox2.Value = False And Checkbox3.Value = False And etc. etc. Then...

Is there a simpler way to write this code that rather than using 10 Ands would be more something along the lines of:

If Checkbox1.Value through Checkbox10.Value all = False Then...

My checkboxes are named sequentially Checkbox1 through Checkbox10

Thanks in advance for any replies.

You could utilize a loop and a boolean variable. Example below:

Please Login or Register  to view this content.