I don't know if this is the whole problem but you have "DropDowns" in the "Set" line instead of "DropDown".
"Jim Berglund" wrote in message news:FYPld.223323$%k.58948@pd7tw2no...
Can someone please help me with the following? I want the contents of a 'Regions' ComboBox to subset the possible choices in a second Combobox. I get a 1004 error relating to the DropDown variable...

Thanks,
Jim Berglund
__________________________________________________ _______________________
Private Sub ComboBox1_Change()
Dim drpdwn As DropDown
With ActiveSheet
Set drpdwn = .DropDowns(Application.Caller)
Select Case drpdwn.ListIndex
Case "All"
' no selection, do nothing
Case 1
' Item1 selected
ComboBox2.ListFillRange = .Range(.Cells(3, 127), ..Cells(4, 127))
Case 2
' item2 selected
ComboBox2.ListFillRange = .Range(.Cells(3, 128), ..Cells(4, 128))
Case 3
' item3 selected
ComboBox2.ListFillRange = .Range(.Cells(3, 129), ..Cells(4, 129))
Case 4
' one of item 4 to 14 selected
ComboBox2.ListFillRange = .Range(.Cells(3, 130), ..Cells(4, 130))
Case 5 To 14
' one of item 4 to 14 selected
ComboBox2.ListFillRange = .Range(.Cells(3, 131), ..Cells(4, 131))
End Select