I want to disable a ComboBox if all 4 CheckBox Values in a UserForm Frame are
True. How do I do this?

Ryan

The easy way is:
if checkbox1=true then
if checkbox2=true then
if checkbox3=true then
if checkbox4=true then
combobox1.Enabled=False
end if
end if
end if
end if
--
-John
Please rate when your question is answered to help us and others know what
is helpful.


"RyanH" wrote:

> I want to disable a ComboBox if all 4 CheckBox Values in a UserForm Frame are
> True. How do I do this?
>
> Ryan

That is an easy way to do it! Do you know of a cleaner way to do it, like a
Loop? Such as count the true check boxes and if it = 4 then disable combobox.
I assume I have to put this code under the Click_Event of each checkbox so
if it is shorter to write a loop I would prefer that. Not to be picky or
anything, lol.

Thanks for the quick response,
Ryan

"John Bundy" wrote:

> The easy way is:
> if checkbox1=true then
> if checkbox2=true then
> if checkbox3=true then
> if checkbox4=true then
> combobox1.Enabled=False
> end if
> end if
> end if
> end if
> --
> -John
> Please rate when your question is answered to help us and others know what
> is helpful.
>
>
> "RyanH" wrote:
>
> > I want to disable a ComboBox if all 4 CheckBox Values in a UserForm Frame are
> > True. How do I do this?
> >
> > Ryan

I am sure this can be done a better way but as a quick suggestion following
may do what you want (not tested):

Dim i As Integer
Dim a As Integer
a = 0
For i = 1 To 4
If Controls("CheckBox" & i).Value = True Then
a = a + 1
End If
Next

With ComboBox1
If a = 4 Then
.Enabled = False
Else
.Enabled = True
End If
End With
--
JB


"RyanH" wrote:

> I want to disable a ComboBox if all 4 CheckBox Values in a UserForm Frame are
> True. How do I do this?
>
> Ryan

Take the product of their values and if not equal to zero then all are checked.
--
Jim Cone
San Francisco, USA
http://www.realezsites.com/bus/primitivesoftware
(Excel Add-ins / Excel Programming)


"RyanH"
wrote in message
I want to disable a ComboBox if all 4 CheckBox Values in a UserForm Frame are
True. How do I do this?
Ryan