I have an excel sheet with 5 option buttons (toolbox option buttons) embedded in the sheet. I also have a combobox embedded on the same sheet. Off to the side, I have a list of values that I would like to fill the combobox with based on which option button is selected. I'm not too familiar with using the case select command in VBA. Right now, I have the following code for the combobox:

Private Sub ComboBox4_Change()
If OptionButton1.Value = True Then
Sheet1.ComboBox4.ListFillRange = "T5:T278"

Else

If OptionButton2.Value = True Then
Sheet1.ComboBox4.ListFillRange = "T279:T552"

Else

If OptionButton3.Value = True Then
Sheet1.ComboBox4.ListFillRange = "T1150:T1639"

Else

If OptionButton4.Value = True Then
Sheet1.ComboBox4.ListFillRange = "T1640:T1676"

Else

If OptionButton5.Value = True Then
Sheet1.ComboBox4.ListFillRange = "T553:T1149"

End If
End If
End If
End If
End If


End Sub

This works fine but only if I select a value from the combobox twice, meaning that if option button 2 is checked, the values for option button 3 might be in the combobox unless I click on a value on the list and then the values for option 2 are now in the combobox. It sounds a lot more complicated than it is but I don't know how to fix it!