Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Reset radio buttons w/ protected worksheet
I have a macro connected to a command button that clears all the radio
buttons on a worksheet. Only problem is when the worksheet is protected it no longer works and gives me error #400. What do I need to do to clear everything when locked? Here is my current code: Sub ResetAll() Dim OptBtn As OptionButton With ActiveSheet .Cells.Interior.ColorIndex = xlNone For Each OptBtn In .OptionButtons OptBtn.Value = False Next OptBtn End With End Sub |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Reset radio buttons w/ protected worksheet
Try....
Sub ResetAll() Dim OptBtn As OptionButton With ActiveSheet .Unprotect Password:="myPassword" .Cells.Interior.ColorIndex = xlNone For Each OptBtn In .OptionButtons OptBtn.Value = False Next OptBtn .Protect Password:="myPassword" End With End Sub -- Regards, Nigel "dgold82" wrote in message ... I have a macro connected to a command button that clears all the radio buttons on a worksheet. Only problem is when the worksheet is protected it no longer works and gives me error #400. What do I need to do to clear everything when locked? Here is my current code: Sub ResetAll() Dim OptBtn As OptionButton With ActiveSheet .Cells.Interior.ColorIndex = xlNone For Each OptBtn In .OptionButtons OptBtn.Value = False Next OptBtn End With End Sub |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Reset radio buttons w/ protected worksheet
Thank you! Works perfectly.
"Nigel" wrote: Try.... Sub ResetAll() Dim OptBtn As OptionButton With ActiveSheet .Unprotect Password:="myPassword" .Cells.Interior.ColorIndex = xlNone For Each OptBtn In .OptionButtons OptBtn.Value = False Next OptBtn .Protect Password:="myPassword" End With End Sub -- Regards, Nigel "dgold82" wrote in message ... I have a macro connected to a command button that clears all the radio buttons on a worksheet. Only problem is when the worksheet is protected it no longer works and gives me error #400. What do I need to do to clear everything when locked? Here is my current code: Sub ResetAll() Dim OptBtn As OptionButton With ActiveSheet .Cells.Interior.ColorIndex = xlNone For Each OptBtn In .OptionButtons OptBtn.Value = False Next OptBtn End With End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Reset button code for Radio Buttons | Excel Discussion (Misc queries) | |||
Is it possible to have two groups of radio buttons on a worksheet? | Excel Worksheet Functions | |||
How can I reset an Excel form that has radio buttons. | Excel Programming | |||
Two sets of radio buttons on a worksheet? | Excel Programming | |||
radio button on protected worksheet | Excel Programming |