referencing a checkbox

[Chad]

I have been playing around with controls on excel 2007 and am getting
frustrated ofver something I am sure is very simple...I simply want to
perform an action when a checkbox = true. I have the following code:

Sub CheckBox1_Click()
If CheckBox1 = True Then
ThisWorkbook.Sheets("Sheet1").Cells(1, 1) = "A"
End If

End Sub

For some reason this code does not recognize when the checkbox is true or
not. can someone point me in the right direction?

Thanks!

Chad

 

[Per Jessen]

I have been playing around with controls on excel 2007 and am getting
frustrated ofver something I am sure is very simple...I simply want to
perform an action when a checkbox = true.  I have the following code:

Sub CheckBox1_Click()
If CheckBox1 = True Then
    ThisWorkbook.Sheets("Sheet1").Cells(1, 1) = "A"
End If

End Sub

For some reason this code does not recognize when the checkbox is true or
not.  can someone point me in the right direction?

Thanks!

Chad

Hi

If CheckBox1.Value = True Then

Regards,
Per

 

[Dave Peterson]

Is this a checkbox from the Control toolbox toolbar or is this a checkbox from
the Forms toolbar?

If it's from the control toolbox toolbar, then is your code under the worksheet
that holds that checkbox?

If it's from the Forms toolbar, then the code belongs in a General module and
needs to be modified.

Did you allow macros to run when you opened the workbook?

 

[Chad]

I believe that the checkbox is from the forms toolbar (Is Office 2007 I go
under the Developer tab and then select 'Insert Control" and choose the
textbox under the form controls).

I have the code running under a module. The sub routine is called when the
checkbox is clicked, however, regardless of whether it is checked or not,
CheckBox1 is always recognized as False.

Thanks again for al lo fyour help.
Chad

 

[Chad]

I was playing around a little bit more and I used the ActiveX controls to
insert a checkbox and it worked. Can someone tell me why inserting a
checkbox from the control toolbar doesn't work with this code?

Thanks!
Chad

 

[Chad]

I have played around with the value property as well, but when I use that
code, I get an error saying that an object is required...

 

[Dave Peterson]

The activeX controls and the controls from the Control toolbox toolbar are
different terms for the same controls.

If you used the checkbox (not textbox) from the Forms toolbar, you could have
used:

Sub CheckBox1_Click()
If activesheet.checkboxes("CheckBox1").value = xlon Then
ThisWorkbook.Sheets("Sheet1").Cells(1, 1) = "A"
End If
End Sub

 

[Chad]

Thanks for the clarification Dave. I tried that and got an error saying:

'Unable to get the CheckBoxes property of the Worksheet class'

Any suggestions?

Again, I am using office 2007.

Thanks again!

Chad

 

[Dave Peterson]

Rightclick on the checkbox.
Look at the namebox (to the left of the formula bar)
You'll see its name.

If it's "Check Box 1", then you'd use:

ActiveSheet.CheckBoxes("Check Box 1").Value

Thanks for the clarification Dave. I tried that and got an error saying:

'Unable to get the CheckBoxes property of the Worksheet class'

Any suggestions?

Again, I am using office 2007.

Thanks again!

Chad

 

[Chad]

Perfect!

Thanks for all of yoru help.

Chad

Rightclick on the checkbox.
Look at the namebox (to the left of the formula bar)
You'll see its name.

If it's "Check Box 1", then you'd use:

ActiveSheet.CheckBoxes("Check Box 1").Value