Programming

  • Thread starter Thread starter Ashley
  • Start date Start date
A

Ashley

I have 87 combo boxes. Their value is either Yes or No.
I am wondering is there a shortest method to make the last
combobox (87th) to be "Yes" if the first 86 comboboxes are
Yes otherwise it is "No".
Right now, all I can think of is to list all 86 combobox
names equal to "Yes" else equal to "No". Is this the only
way to do it?

Ashley
 
Hi Ashley, I'm unsure of the reason you would want to do this, however you
might be able to try this method

1) Name your ComboBoxes cbo01, cbo02, ..., cbo87

2) run the code after updating any of the first 86 ComboBoxes

Dim intCount As Integer
Dim blnTest as Boolean: blnTest = True
For intCount = 1 To 86
blnTest = blnTest And (Me("cbo" & Format(intCount,"00")).Value = "Yes")
Next
If blnTest Then
cbo87 = "Yes"
End If

Hope this helps, Graeme
 
Back
Top