Enabling Option Buttons by groupname

[Longwalker]

Hi All
As a first-time participant I hope someone may be able to help me

On a vba form in excel, I have created 20 groups of 8 option buttons each with a unique groupname
I want to enable or disable option buttons by groupname according to some parameters
Can someone please tell me what he code line is to do this?

Many thanks

 

[hatman]

This will do it:

Private Sub CommandButton1_Click()

    Dim Item As MSForms.Control
    
    For Each Item In Me.Controls
    
        If TypeName(Item) = "OptionButton" Then
        
            If Item.GroupName = "group1" Then
            
                If Item.Enabled = True Then
                
                    Item.Enabled = False
                    
                Else
                
                    Item.Enabled = True
                    
                End If
                
            End If
            
        End If
        
    Next Item
    

End Sub

However, you may wish to consider grouping the controls in frames. When you change the Enable property of a frame, the controls contained within it behae as if their Enabled property has also been changed (if you check their Enabled property with Code, it will be unchanged, but the effect to the user is the same as if that property has changed). This method would be much easier... plus you get to provide a visual cue to teh user that certain optiobuttons are grouped, by virtue of the frame border. If you didn't WANT the frame border to appear, you can also change the appearance so it's effectively invisible.

 

[Longwalker]

That's beautiful hatman, thanks for taking the trouble

Longwalker