Dependent Dropdown (VBA)

[Robby19]

Good day!

Looking for some help in creating a dependent dropdown (combo box) on a User from. The Named Ranges are being pulled from tables.

Basically it needs to run like this;

If ExpIncDrop (Combo box) = "Expense"
Then TypeDrop (Combo box) = ExpenseType (Defined Named Range)
Else TypeDrop (Combo box) = IncomeType (Defined Named Range)

ExpenseType and IncomeType is a defined named range both in separate tables.

 

[Yongle]

Try this

Private Sub TypeDrop_DropButt*******()
    Dim Rng As Range
    Set Rng = Range("Income")
    If ExpIncDrop.Value = "Expense" Then Set Rng = Range("Expense")
    TypeDrop.List = Application.WorksheetFunction.Transpose(Rng)
End Sub

 

[Yongle]

How strange - I can see asterisks in the post above
- tried several times and it refuses to display correctly in the post window

Remove the space between Button and Click below !!

Private Sub TypeDrop_Drop[COLOR=#ff0000]Button[/COLOR] [COLOR=#ff0000]Click[/COLOR]()
    Dim Rng As Range
    Set Rng = Range("Income")
    If ExpIncDrop.Value = "Expense" Then Set Rng = Range("Expense")
    TypeDrop.List = Application.WorksheetFunction.Transpose(Rng)
End Sub

 

[Robby19]

Haha. I see the asterisks too. I was going through each and every selection to figure it out. Thank you! It works!!

 

[Robby19]

You mind helping me out on the other post?
https://www.mrexcel.com/forum/excel-questions/1071364-transfer-data-userform.html