Check a Check Box with VB

  • Thread starter Thread starter kittronald
  • Start date Start date
Dave,

Perhaps I'm not using the proper syntax.

Sheet2.CheckBox23.Value = True



- Ronald K.
 
Dave,

Thanks for the quick response.

Apparently, pressing the Send button was the solution.

Sheet2.CheckBoxes("Check Box 23").Value = True

In the future, I'll press the Send button before posting a question. 8)




- Ronald K.
 
Is this the shortest way to test if a Checkbox is already checked ?

Sub TEST()
If Sheet2.CheckBoxes("Check Box 23").Value = False Then
Sheet2.CheckBoxes("Check Box 23").Value = True
Else
Sheet2.CheckBoxes("Check Box 23").Value = True
End If
End Sub



- Ronald K.
 
kittronald expressed precisely :
Is this the shortest way to test if a Checkbox is already checked ?

Sub TEST()
If Sheet2.CheckBoxes("Check Box 23").Value = False Then
Sheet2.CheckBoxes("Check Box 23").Value = True
Else
Sheet2.CheckBoxes("Check Box 23").Value = True
End If
End Sub



- Ronald K.
Click to expand...

No need to make the If evaluation redundant, it just adds extra
processing for VBA. No big deal on one-by-one basis but the cummulative
effect can add up...

Sub TEST()
If Not Sheet2.CheckBox23 Then Sheet2.CheckBox23 = True
End Sub

...so if it's NOT True then it gets changed to True. No need to set it
to True if it's already True! No need to test if its value = False
because Value is its default property. IOW, the control can only be
True (checked) or False (unchecked).
 
This looks like it's a checkbox from the Forms toolbar -- not from the control
toolbox toolbar.

You can use xloff or xlon.

And if you just want to make it checked, there's no reason to check first.

sheet2.checkboxes("check box 23").value = xlon

If you are processing something based on the checkbox, you could use:

if sheet2.checkboxes("check box 23").value = xlon then
'or = xloff to check to see if it's empty
 
Garry,

Got it to work with a little modification.

If Not Sheet2.CheckBoxes("Check Box 23") Then
Sheet2.CheckBoxes("Check Box 23") = True

Thanks again.



- Ronald K.
 
Dave,

The Check Box is from the Forms toolbar.

If the Check Box was already checked, would repeatedly setting the Check
Box to xlon trigger events to execute again that are dependent on it being
checked ?



- Ronald K.
 
After serious thinking kittronald wrote :
Garry,

Got it to work with a little modification.

If Not Sheet2.CheckBoxes("Check Box 23") Then
Sheet2.CheckBoxes("Check Box 23") = True

Thanks again.



- Ronald K.
Click to expand...

Ok, Ron. So as Dave suggests you are using Forms controls and not
ActiveX. My bad for not picking up on this. Glad you got it working...
 
Back
Top