У залежнасці ад абставін вам можа спатрэбіцца выбраць некалькі значэнняў у выпадальным спісе. У гэтым уроку мы збіраемся паказаць вам, як зрабіць множны выбар у выпадальным спісе. Для гэтага сеансу мы выкарыстоўваем Excel 2019, не саромейцеся выкарыстоўваць сваю абраную версію.

Перш чым паглыбіцца ў сеанс, давайце пазнаёмімся з наборам даных, які з'яўляецца асновай для нашых прыкладаў.

Тут у нас ёсць некалькі канцтаварных элементаў, выкарыстоўваючы іх, мы створым выпадальны спіс і выбярэм там некалькі элементаў.

Звярніце ўвагу, што гэта просты набор даных, каб усё было прасцей. . У практычным сцэнары вы можаце сутыкнуцца з значна большым і складаным наборам даных.

Практычны сшытак

Вы можаце загрузіць практычны сшытак па спасылцы ніжэй.

Множны выбар з выпадальнага спісу.xlsm

Множны выбар у выпадальным спісе

Перш за ўсё, нам трэба стварыць выпадальны спіс на аснове нашы канцтавары. Давайце створым яго хутка. Не саромейцеся наведаць артыкул аб стварэнні выпадальнага спісу.

У дыялогавым акне Праверка даных выберыце тып даных СПІС і ўстаўце дыяпазон ячэек элементаў.

B4:B11 - гэта дыяпазон, які змяшчае канцылярскія элементы. Цяпер вы знойдзеце выпадальны спіс.

Дадатковая інфармацыя: Выпадальны спіс Excel у залежнасці ад выбару

1. ВыберыцеНекалькі элементаў (дазваляе дублікат выбару)

Звычайны выпадальны спіс заўсёды выбірае адзін элемент. Тут вы бачыце, што мы выбралі Pen са спісу (малюнак ніжэй).

Цяпер, калі мы выбіраем іншы элемент, скажам, Аловак

то ён заменіць папярэдняе значэнне. Толькі Аловак застанецца выбраным.

Каб выбраць некалькі элементаў, нам трэба выкарыстоўваць код VBA . Адкрыйце акно Microsoft Visual Basic для прыкладанняў (націсніце ALT + F11 , каб адкрыць яго).

Цяпер двойчы пстрыкніце імя або нумар аркуша, дзе вы хочаце выбраць некалькі элементаў у выпадальным спісе. Вы знойдзеце акно кода для гэтага канкрэтнага аркуша.

Вось акно кода для Ліста2 у нашай працоўнай кнізе (у нас ёсць выпадальнае меню спіс на гэтым аркушы).

Як толькі адкрыецца акно кода, устаўце туды наступны код

8875

Захавайце код і паспрабуйце выбраць значэнні у выпадальным спісе.

Выбраўшы Аловак , мы збіраемся выбраць іншы элемент Блакнот . І вы бачыце, што мы знайшлі абодва элементы (малюнак ніжэй).

Гэты код дазволіць нам паўтарыць выбар. Скажам, калі мы зноў выбіраем Аловак ,

мы зноў знойдзем элемент у полі выбару.

Тлумачэнне кода

Мы аб'явілі два радкі Oldvalue і Новае значэнне .

Вы бачыце, што выпадальны спіс зроблены ў ячэйцы D4 , таму наш мэтавы адрас - D4 . Акрамя таго, мы пераправерылі, ці выкарыстоўвае ячэйка праверку даных, ці не выкарыстоўвае Target.SpecialCells .

Пасля выбару значэння мы адключаем падзеі ( Application.EnableEvents = False ), таму змены не t выклікаць падзею зноў. Затым захаваў абраны элемент у Новае значэнне .

Пасля адмены змяненняў мы задалі значэнне ў Старое значэнне . Затым праверце, пустое Oldvalue ці не. Калі пусты (азначае, што выбрана толькі адно значэнне), вяртайце Новае значэнне . У адваротным выпадку аб'яднайце Oldvalue і Newvalue .

Перад завяршэннем падзеі скіду, каб мы маглі змяніць, калі спатрэбіцца.

Больш падрабязна: Множна залежны выпадальны спіс Excel VBA

2. Выберыце некалькі элементаў з выпадальнага спісу (толькі ўнікальны выбар)

У папярэднім раздзеле , мы бачылі некалькі выбараў, дзе было дазволена паўтарэнне. Калі вы гэтага не хочаце, прытрымлівайцеся гэтага раздзела.

Для зручнасці мы выкарыстоўвалі асобны аркуш для гэтай дэманстрацыі. На гэты раз мы на Sheet3. Напішыце наступны код у акне кода для гэтага аркуша.

6003

Ці ёсць розніца ў параўнанні з папярэднім кодам? Прыгледзьцеся бліжэй, і вы зможаце заўважыць невялікую розніцу.

Тут мы выкарысталі функцыю VBA пад назвай INSTR . Функцыя INSTR вяртае пазіцыю першага ўваходжання падрадка ў радок. Наведайце гэты артыкул INSTR для атрымання дадатковай інфармацыі.

Выкарыстоўваючы гэтую лагічную аперацыю з InStr(1, Oldvalue, Newvalue) = 0, мы праверылі, ці знойдзены значэнні ці не. Калі лагічная аперацыя вяртае TRUE (раней не знойдзена), гэта дазваляе выбраць элемент і аб'яднаць яго з папярэднім значэннем.

Захавайце код і паспрабуйце выбраць элемент, які ўжо быў быў выбраны.

Тут мы ўжо выбралі Аловак , калі мы хочам выбраць яго зноў, мы не можам. Ён не дазваляе паўтаральныя значэнні.

Дадатковая інфармацыя: Як стварыць выпадальны спіс з іншага аркуша ў Excel

3. Выберыце Элементы ў новым радку

Да гэтага часу мы выявілі, што элементы падзеленыя коскамі. У гэтым раздзеле мы размесцім выбраныя элементы ў новых радках.

Для прастаты мы аб'ядноўваем некалькі вочак з ячэйкай D4 . Каб зрабіць гэта, абярыце ячэйкі, якія хочаце аб'яднаць, і націсніце Аб'яднаць & Цэнтр у раздзеле Выраўноўванне ўкладкі Галоўная .

Ячэйка атрымае большую вышыню.

Цяпер давайце паглядзім на код для падзелу элементаў праз новы радок. Выкарыстоўвайце наступны код

8460

Адзінае адрозненне ад папярэдняга кода ў тым, што на гэты раз мы выкарыстоўвалі vbNewLine паміж OldValue і NewValue .

vbNewLine забяспечвае новы радок паміж элементамі.

Цяпер выберыце элементы.

Мы выбіраем элемент Pen , які паказаны на малюнку вышэй. Цяпер абярыце іншы элемент.

Вы ўбачыце, што два элементы знаходзяцца ў розных радках.

Тут у нас ёсць два значэнняў, якія знаходзяцца ў двух розных радках. Выбар іншага значэння дадасць яго ў іншы радок. Кожнае значэнне будзе ў новым радку.

Звярніце ўвагу, што калі вы жадаеце іншы раздзяляльнік для падзелу элементаў, выкарыстоўвайце яго ў двукоссі замест vbNewline .

Выснова

На сёння ўсё. Мы пералічылі некалькі спосабаў зрабіць некалькі выбараў у выпадальным спісе. Спадзяюся, вы знойдзеце гэта карысным. Не саромейцеся каментаваць, калі нешта здаецца цяжкім для разумення. Дайце нам ведаць любыя іншыя метады, якія мы прапусцілі тут.