Hi,
Can anyone help me. I would like to simplify below code to make it execute efficiently.
What I want is
i=34 and CheckBox2a,
i=36 and CheckBox2b,
i=38 and CheckBox2c,
i=40 and CheckBox2d,
and so on..
However, the code below will execute i=34 for all checkBoxes "a to g" and repeat the same thing for i=36 and so on..
Code
For i = 34 To 46 Step 2
CB = Array(a, b, c, d, e, g, f, g)
For j = LBound(CB) To UBound(CB)
If Me.Controls("ComboBox" & i).Value = "" And Me.CheckBox2(CB).Value = False Then
MsgBox "Found blank score value in Module 2(b)", 48, s
Exit Sub
End If
Next j
Next i