Forms control checkboxes on charts
Assign this code to both checkboxes.
Sub cbox_Click()
Dim sName As String, cbox1 As CheckBox
Dim cbox2 As CheckBox
sName = Application.Caller
If LCase(sName) = "check box 1" Then
Set cbox2 = ActiveChart.CheckBoxes("Check box 2")
Else
Set cbox2 = ActiveChart.CheckBoxes("Check box 1")
End If
Set cbox1 = ActiveChart.CheckBoxes(sName)
If cbox1 = xlOn Then
cbox2 = xlOff
Else
' comment out if both can be unchecked.
cbox2 = xlOn
End If
End Sub
if you select the checkbox, then you can rename it in the namebox.
(highlight the current name and type in a new name. You would need to
adjust the code above to match the names.
--
Regards,
Tom Ogilvy
"routeram" wrote in message
...
Hi,
I have 2 checkboxes (forms) on a chart. I would like to have just one
checkbox checked at anytime. I know a radiobutton would do the same but I
need only 2 checkboxes since they don't fall into a single category. What
do
I have to do to achieve this? I tried to group them but it doesn't help.
How
do I write code for this? Also is it possible to change the names of these
checkboxes from checkboxN to something else?
Please help.
Regards,
Ram
|