Button To Hide All Option Buttons

riedyp

Board Regular
Joined
Feb 13, 2020
Messages
88
Office Version
  1. 365
Platform
  1. Windows
Hello,

I am creating a button that will display all hidden Rows, GroupBoxes and Option Buttons.
My code for the GroupBoxes works but I cant get the option button code to work correctly.
Below is my current work. Thank you.

VBA Code:
Private Sub CommandButton5_Click() ' Enter Editing Mode
Dim myGB As GroupBox    'Hide All Group Boxes
For Each myGB In ActiveSheet.GroupBoxes
myGB.Visible = True
Next myGB

Dim myOB As OptionButton            'Hide All Option Buttons
For Each myOB In ActiveSheet.Shapes
myOB.Visible = False
Next myOB

Rows("9:100").Hidden = False
End Sub
 

Excel Facts

Copy a format multiple times
Select a formatted range. Double-click the Format Painter (left side of Home tab). You can paste formatting multiple times. Esc to stop
Try following change to your For Next Loop & see if helps

VBA Code:
For Each myOB In ActiveSheet.OptionButtons
    myOB.Visible = msoFalse
Next myOB

Dave
 
Upvote 0

Forum statistics

Threads
1,223,888
Messages
6,175,207
Members
452,618
Latest member
Tam84

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top