ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   controlling a form drop down based on selection of another drop down (https://www.excelbanter.com/excel-programming/363314-controlling-form-drop-down-based-selection-another-drop-down.html)

flurry[_7_]

controlling a form drop down based on selection of another drop down
 

I've got a form that has a selection of drop downs - I'd like one of the
drop down later on in the form to be controlled by what a user selects
in the first drop down - e.g. the first drop down has A, B, C, D, E to
select from - if they select A I'd like the later drop down to show
certain list, if they select B I'd like it to show a different list and
so on. Is this possible? Many, many thanks as ever!


--
flurry
------------------------------------------------------------------------
flurry's Profile: http://www.excelforum.com/member.php...o&userid=34303
View this thread: http://www.excelforum.com/showthread...hreadid=548596


colofnature[_42_]

controlling a form drop down based on selection of another drop down
 

If you have a dynamic range in the workbook, whose size relates to the
value of the first combobox
e.g. on Sheet1
column A|column B
A Ai
A Aii
A Aiii
B Bi
B Bii
C Ci
C Cii
C Ciii
etc whatever...

and C1 is linked to CombBox1.ControlSource
with a named range "MyRange"
=OFFSET(Sheet1!$B$1,MATCH(Sheet1!$C$1,Sheet1!$A:$A ,0)-1,0,COUNTIF(Sheet1!$A:$A,Sheet1!$C$1),1)

Then put something like this in the the _enter event of ComboBox2 or
_exit event of ComboBox1

ComboBox2.Clear
if thisworkbook.sheets("Sheet1").range("C1").value<e mpty then
for each c in thisworkbook.sheets("Sheet1").range("MyRange")
ComboBox2.additem (c.value)
next


You'll probably need to tweak it a little...
Col


--
colofnature
------------------------------------------------------------------------
colofnature's Profile: http://www.excelforum.com/member.php...o&userid=34356
View this thread: http://www.excelforum.com/showthread...hreadid=548596



All times are GMT +1. The time now is 11:20 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com