Unselectable items in a Combo Box in an Excel VBA -



Unselectable items in a Combo Box in an Excel VBA -

i have combo box (in user form in excel) info source set of menu items headers (a named range in worksheet). right now, workaround erase these headers (e.g. main course, desserts, beverages, etc.) still know if it's possible add together these unselectable headers end user has distinctions between different menu items. help much appreciated :)

e.g.

main courses (**unselectable**) roast beef mashed potato (selectable) spicy spareribs (selectable) beef stroganoff (selectable) roast chicken (selectable) desserts (**unselectable**) mango float (selectable) brownies (selectable) lemon squares (selectable)

no afaik, can't that. below 2 alternatives. take pick :)

alternative 1

deselect moment user selects relevant header. example

private sub userform_initialize() combobox1.style = fmstyledropdownlist combobox1.additem "--- main courses ---" combobox1.additem "roast beef mashed potato" combobox1.additem "spicy spareribs" combobox1.additem "--- desserts ---" combobox1.additem "mango float" combobox1.additem "brownies" end sub private sub combobox1_click() select case combobox1.value case "--- main courses ---", "--- desserts ---" combobox1.value = "" end select end sub

alternative 2

use 2 comboboxes. 1 header , other different menu items. populate sec combobox based on selection of first combobox. example

private sub userform_initialize() combobox1.style = fmstyledropdownlist combobox2.style = fmstyledropdownlist combobox1.additem "--- main courses ---" combobox1.additem "--- desserts ---" end sub private sub combobox1_click() combobox2.clear select case combobox1.value case "--- main courses ---" combobox2.additem "roast beef mashed potato" combobox2.additem "spicy spareribs" case "--- desserts ---" combobox2.additem "mango float" combobox2.additem "brownies" end select end sub

also on safer side, utilize combobox1_change event.

excel vba excel-vba combobox

Comments

Popular posts from this blog

xslt - DocBook 5 to PDF transform failing with error: "fo:flow" is missing child elements. Required content model: marker* -

mediawiki - How do I insert tables inside infoboxes on Wikia pages? -

Local Service User Logged into Windows -