userform combo box conditional rnages

I've got a userform with mutliple combo boxes

Each of the combo boxes selects from a separate named range

Is it possible to have the options in combo box 2 change depending on the option selected in combo box 1?

eg

combo box 1 choices, 1,2,3,4,5 (named range 1)
combo box 2..........
if combo box is "1" then select from (named range 2) a,b,c,d,
if combo box is "2" then select from (named range 3) X,y,z

then if combo box 2 is X then select from (named range 4) P, Q,R)

I've used combo boxes in my form but there may be an easier way. I am willing to learn.

Thanks in advance.

Hi,

Have you tried using a Select Case statement?

For example:

Select Case CStr(ComboBox1.Value)
    Case "1"
        With ComboBox2        
            .Clear
            .AddItem "a"
            .AddItem "b"
            .AddItem "c"
            .AddItem "d"
        End With
    Case "2"
        With CombBox2
            .Clear
            .AddItem "x"
            .AddItem "y"
            .AddItem "z"
    Case "3"
        ....and so on
End Select

Insert something like this in the ComboBox1_Change() event.

Hope this helps

ajryan88 thanks for your time to help on this problem.

When I click on the second combobox i have no options.


this is the code I have

Private Sub CBox_Hazard_Group_Description_Change() ' combobox 1
Select Case CStr(CBox_Group_name.Value) 'combobox 2
    Case "HEALTH"
        With CBox_Hazard_Group_Description 'combobox 1
            '.Clear
            .AddItem "Hazards with potential to impact personal health and well-being"
            .AddItem "b"
            '.AddItem "c"
            '.AddItem "d"
        End With
    Case "Safety"
        With CBox_Hazard_Group_Description
            .Clear
            .AddItem "Hazards with potential to impact personal safety or Plant stability"""
            '.AddItem "y"
            '.AddItem "z"
    'Case "3"
        
End Select
End Sub

oh okay thats my issue

ill have a looksee in the morning

cheers

I still have the same issue.

Does the RowSource for the combobox have to be empty?

CBox_Group_name_Change()

Select Case CStr(CBox_Group_name.Value)
    Case "Health"
        With CBox_Hazard_Group_Description        
            .Clear
            .AddItem "Hazards with potential to impact personal health and well-being"
            End With
    Case "Safety"
        With CBox_Hazard_Group_Description        
            .Clear
            .AddItem "Hazards with potential to impact personal safety or Plant stability"
            End With
Case "Environment"
        With CBox_Hazard_Group_Description        
            .Clear
            .AddItem "Hazards with potential to impact the environment"
            End With
Case "Process Safety"
        With CBox_Hazard_Group_Description        
            .Clear
            .AddItem "Hazards associated with work on Facility Safety & Emergency Systems"
            End With
Case "ISSoW"
        With CBox_Hazard_Group_Description        
            .Clear
            .AddItem "Permits & Certificates"
            End With
End Select

it may be easier to create new user forms for the different options.