Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mutually Exclusive Option Boxes
I need to set up 3 option boxes that are mutually exclusive.
When I click on one option box the other two should be unchecked etc.etc. How do I go about doing this - I had a look through the forum but I can't seem to find a solution. Thanks |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mutually Exclusive Option Boxes
If you are using the form control option buttons then put them inside a
group box. All option buttons inside a group box are mutually exclusive. If you are using the ActiveX option buttons then set the Groupname property on each of the option buttons to the same value. Regards, Fred "5elpep" wrote in message ... I need to set up 3 option boxes that are mutually exclusive. When I click on one option box the other two should be unchecked etc.etc. How do I go about doing this - I had a look through the forum but I can't seem to find a solution. Thanks |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mutually Exclusive Option Boxes
On Jul 25, 1:56*pm, "Fred" <leavemealone@home wrote:
If you are using the form control option buttons then put them inside a group box. All option buttons inside a group box are mutually exclusive. If you are using the ActiveX option buttons then set the Groupname property on each of the option buttons to the same value. Regards, Fred "5elpep" wrote in message ... I need to set up 3 option boxes that are mutually exclusive. When I click on one option box the other two should be unchecked etc.etc. How do I go about doing this - I had a look through the forum but I can't seem to find a solution. Thanks- Hide quoted text - - Show quoted text - Sorry I should have been more specific - I am usin the controls toolbox. |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mutually Exclusive Option Boxes
ActiveX is another name for the same Control toolbox toolbar controls.
Rightclick on each option button that should be grouped together. Select properties and make sure each optionbutton in a group has the same unique groupname. By default the groupname for all the optionbuttons is the sheet name. That's why they start out all grouped together. 5elpep wrote: On Jul 25, 1:56 pm, "Fred" <leavemealone@home wrote: If you are using the form control option buttons then put them inside a group box. All option buttons inside a group box are mutually exclusive. If you are using the ActiveX option buttons then set the Groupname property on each of the option buttons to the same value. Regards, Fred "5elpep" wrote in message ... I need to set up 3 option boxes that are mutually exclusive. When I click on one option box the other two should be unchecked etc.etc. How do I go about doing this - I had a look through the forum but I can't seem to find a solution. Thanks- Hide quoted text - - Show quoted text - Sorry I should have been more specific - I am usin the controls toolbox. -- Dave Peterson |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mutually Exclusive Option Boxes
Cheers Dave & Fred,
I am now trying to control protection on part of the worksheet via one of my option buttons. Basically when the option is checked the cells should be unprotected and when I select one of the other option buttons in the group the cells should be protected again. I am using the below code but it oesn't seem to work. It unprotects and protects the sheet fine but it won't format the cells as required. Any pointers would be much appreciated. Private Sub OptionButton1_Click() If OptionButton1.Value = True Then ActiveSheet.Unprotect Range("I22:K35").Select Selection.Locked = False Selection.FormulaHidden = False Selection.Interior.ColorIndex = 39 ActiveSheet.Protect Else ActiveSheet.Unprotect Range("I22:K35").Select Selection.Locked = True Selection.FormulaHidden = True Selection.Interior.ColorIndex = xlNone ActiveSheet.Protect End If End Sub |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Mutually Exclusive Option Boxes
I put a couple of optionbuttons from the control toolbox toolbar on my test
worksheet. I added the code to the worksheet's module. The code worked fine when I clicked OptionButton1. But the only time excel sees you click on optionbutton1 is when you change its value from off to on. You actually turn it off by selecting (clicking on) a different optionbutton. So have one procedure for each button: Option Explicit Private Sub OptionButton1_Click() If OptionButton1.Value = True Then With Me .Unprotect With Me.Range("I22:K35") .Locked = False .FormulaHidden = False .Interior.ColorIndex = 39 End With .Protect End With End If End Sub Private Sub OptionButton2_Click() If OptionButton2.Value = True Then With Me .Unprotect With Me.Range("I22:K35") .Locked = True .FormulaHidden = True .Interior.ColorIndex = xlNone End With .Protect End With End If End Sub I don't know what your 3rd optionbutton does. 5elpep wrote: Cheers Dave & Fred, I am now trying to control protection on part of the worksheet via one of my option buttons. Basically when the option is checked the cells should be unprotected and when I select one of the other option buttons in the group the cells should be protected again. I am using the below code but it oesn't seem to work. It unprotects and protects the sheet fine but it won't format the cells as required. Any pointers would be much appreciated. Private Sub OptionButton1_Click() If OptionButton1.Value = True Then ActiveSheet.Unprotect Range("I22:K35").Select Selection.Locked = False Selection.FormulaHidden = False Selection.Interior.ColorIndex = 39 ActiveSheet.Protect Else ActiveSheet.Unprotect Range("I22:K35").Select Selection.Locked = True Selection.FormulaHidden = True Selection.Interior.ColorIndex = xlNone ActiveSheet.Protect End If End Sub -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Mutually exclusive cells - Excel 2003 | Excel Worksheet Functions | |||
Is there a way to make 6 columns mutually exclusive? | Excel Worksheet Functions | |||
2 IF Statements not mutually exclusive | Excel Discussion (Misc queries) | |||
Making checkboxes mutually exclusive | Excel Discussion (Misc queries) | |||
Mutually exclusive values | Excel Programming |