Hi please some one help.

This has been bugging me for days!!

I have a combo box (cbType) displaying a named range.

What i want is combobox2 (cbPD) to display another named range (CoolerList) if the value in cbType is choosen as Cooler.

Hope this makes sense?

Here is my code.

I really hope someone can help.

Private Sub cbPD_Change()

If StockIn.cbType.Value = ("Cooler") Then
cbPD.List = Sheets("LookupLists").Range("CoolerList").Value

End If
End Sub

Private Sub UserForm_Initialize()
Me.cbType.List = Sheets("LookupLists").Range("TypeList1").Value
End Sub

Thanks