Setting a CheckBox Value to False

[The Hawk]

Hi: I'd like to set a checkbox value to false after selection of an item
from a Combo Box. I've tried various things, but cannot seem to get the
correct syntax. Both the Combo Box and Check Box are on a User Form. The
latest code tried is:

Private Sub cmbMembers_Change()
If Val(cmbMembers.Value) > 0 Then
Cells(cmbMembers.Value, 1).Select
CheckBox1.Enabled = True: Value = False
Else
CheckBox1.Enabled = False
CheckBox2.Enabled = False
CheckBox3.Enabled = False
End If
End Sub

Any help will be appreciated...

[Ron de Bruin]

Hi

You must use the value property of the checkbox

CheckBox1.Value = False

--
Regards Ron de Bruin
http://www.rondebruin.nl


"The Hawk" <[email protected]> wrote in message news:[email protected]...
> Hi: I'd like to set a checkbox value to false after selection of an item
> from a Combo Box. I've tried various things, but cannot seem to get the
> correct syntax. Both the Combo Box and Check Box are on a User Form. The
> latest code tried is:
>
> Private Sub cmbMembers_Change()
> If Val(cmbMembers.Value) > 0 Then
> Cells(cmbMembers.Value, 1).Select
> CheckBox1.Enabled = True: Value = False
> Else
> CheckBox1.Enabled = False
> CheckBox2.Enabled = False
> CheckBox3.Enabled = False
> End If
> End Sub
>
> Any help will be appreciated...

[Raman325]

or

With CheckBox1

.Enabled = True
.Value = False

End With

[theguz]

Or:

'I am assuming the name of the form is UserForm1

UserForm1.Controls("CheckBox1").Value = False

Hope this helps

theguz

[Tom Ogilvy]

Private Sub cmbMembers_Change()
If Val(cmbMembers.Value) > 0 Then
Cells(cmbMembers.Value, 1).Select
CheckBox1.Enabled = True
CheckBox1.Value = False
Else
CheckBox1.Enabled = False
CheckBox2.Enabled = False
CheckBox3.Enabled = False
End If
End Sub



"The Hawk" <[email protected]> wrote in message
news:[email protected]...
> Hi: I'd like to set a checkbox value to false after selection of an item
> from a Combo Box. I've tried various things, but cannot seem to get the
> correct syntax. Both the Combo Box and Check Box are on a User Form. The
> latest code tried is:
>
> Private Sub cmbMembers_Change()
> If Val(cmbMembers.Value) > 0 Then
> Cells(cmbMembers.Value, 1).Select
> CheckBox1.Enabled = True: Value = False
> Else
> CheckBox1.Enabled = False
> CheckBox2.Enabled = False
> CheckBox3.Enabled = False
> End If
> End Sub
>
> Any help will be appreciated...

[The Hawk]

Folks: I figured it out. Here's the final code:
Private Sub cmbMembers_Change()
If Val(cmbMembers.Value) > 0 Then
Cells(cmbMembers.Value, 1).Select
CheckBox1.Enabled = True
CheckBox1.Value = Cells(cmbMembers.Value, 4)
Else
CheckBox1.Enabled = False
CheckBox2.Enabled = False
CheckBox3.Enabled = False
End If
End Sub

Thanks...

"The Hawk" wrote:

> Hi: I'd like to set a checkbox value to false after selection of an item
> from a Combo Box. I've tried various things, but cannot seem to get the
> correct syntax. Both the Combo Box and Check Box are on a User Form. The
> latest code tried is:
>
> Private Sub cmbMembers_Change()
> If Val(cmbMembers.Value) > 0 Then
> Cells(cmbMembers.Value, 1).Select
> CheckBox1.Enabled = True: Value = False
> Else
> CheckBox1.Enabled = False
> CheckBox2.Enabled = False
> CheckBox3.Enabled = False
> End If
> End Sub
>
> Any help will be appreciated...