Basic example attached. This should give you a good idea of how to proceed.
Sheet1 holds lists for which named ranges were created.
Userform contains two combo boxes.
Code in the form initialize event
Private Sub UserForm_Initialize()
With Me
.ComboBox1.RowSource = "States"
End With
End Sub
Code for combo box #1
Private Sub ComboBox1_Change()
Select Case Me.ComboBox1.Value
Case "California": Me.ComboBox2.RowSource = "Cities_CA"
Case "Florida": Me.ComboBox2.RowSource = "Cities_FL"
End Select
End Sub
Bookmarks