Կախված հանգամանքներից, գուցե անհրաժեշտ լինի ընտրել մի քանի արժեք բացվող ցուցակում: Այս ձեռնարկում մենք պատրաստվում ենք ձեզ ցույց տալ, թե ինչպես կատարել բազմակի ընտրություն բացվող ցուցակում: Այս աշխատաշրջանի համար մենք օգտագործում ենք Excel 2019-ը, ազատ զգացեք օգտագործել ձեր նախընտրած տարբերակը:

Նախքան նստաշրջանի մեջ մտնելը, եկեք ծանոթանանք տվյալների բազային, որը մեր օրինակների հիմքն է:

Այստեղ մենք ունենք գրենական պիտույքների մի քանի տարրեր, դրանք օգտագործելով՝ մենք կստեղծենք բացվող ցուցակ և այնտեղ կընտրենք մի քանի տարրեր:

Նկատի ունեցեք, որ դա պարզ տվյալների բազա է ամեն ինչ պարզ պահելու համար: . Գործնական սցենարի դեպքում դուք կարող եք հանդիպել շատ ավելի մեծ և բարդ տվյալների բազայի:

Պրակտիկայի աշխատանքային գիրք

Դուք կարող եք ներբեռնել գործնական աշխատանքային գիրքը ստորև նշված հղումից:

Կատարեք բազմակի ընտրություն Drop Down List.xlsm-ից

Բազմակի ընտրություն բացվող ցուցակում

Առաջին հերթին մենք պետք է ստեղծենք բացվող ցուցակ՝ հիմնվելով մեր գրենական պիտույքները. Եկեք արագ ստեղծենք այն: Մի հապաղեք այցելել բացվող ցուցակի ստեղծման վերաբերյալ հոդվածը:

Տվյալների վավերացում երկխոսության դաշտում ընտրեք LIST տվյալների տեսակը և տեղադրեք տարրերի բջիջների տիրույթը:

B4:B11 այն տիրույթն է, որը պարունակում է գրենական պիտույքների տարրերը: Այժմ դուք կգտնեք բացվող ցանկը:

Կարդալ ավելին. Excel-ի բացվող ցանկը կախված ընտրությունից

1. ԸնտրեքԲազմաթիվ տարրեր (Թույլ է տալիս կրկնակի ընտրություն)

Պայմանական բացվող ցուցակը միշտ ընտրում է մեկ տարր: Այստեղ դուք կարող եք տեսնել, մենք ընտրել ենք Գրիչ ցանկից (ներքևի նկարը):

Այժմ, եթե ընտրենք մեկ այլ տարր, ասենք Մատիտ

այնուհետև այն կփոխարինի նախկին արժեքին: Միայն Մատիտ կմնա ընտրված:

Բազմաթիվ տարրեր ընտրելու համար մենք պետք է օգտագործենք VBA կոդը: Բացեք Microsoft Visual Basic հավելվածների համար պատուհանը (սեղմեք ALT + F11 այն բացելու համար):

Այժմ կրկնակի սեղմեք աշխատաթերթի անվան կամ համարի վրա, որտեղ ցանկանում եք ընտրել: մի քանի տարրեր բացվող ցանկում: Դուք կգտնեք կոդի պատուհանը տվյալ թերթի համար:

Ահա մեր աշխատանքային գրքում Sheet2 ծածկագրի պատուհանը (մենք ունենք բացվող պատուհանը ցանկը այս թերթում):

Հենց կոդի պատուհանը բացվի, այնտեղ տեղադրեք հետևյալ կոդը

8252

Պահպանեք կոդը և այժմ փորձեք ընտրել արժեքներ բացվող ցանկում:

Ընտրելով Մատիտ ՝ մենք պատրաստվում ենք ընտրել մեկ այլ տարր Նոթատետր : Եվ դուք կարող եք տեսնել, որ մենք գտել ենք երկու տարրերն էլ (ներքևում գտնվող պատկերը):

Այս կոդը թույլ կտա մեզ կրկնել ընտրությունը: Ենթադրենք, եթե նորից ընտրենք Մատիտ ,

մենք նորից կգտնենք նյութը ընտրության վանդակում։

Կոդի բացատրություն

Մենք հայտարարագրել ենք երկու տող Oldvalue և Newvalue :

Դուք կարող եք տեսնել, որ մենք բացվող ցուցակը կազմել ենք D4 բջիջում, այդ իսկ պատճառով մեր թիրախային հասցեն է D4 : Եվ ի լրումն, մենք կրկին ստուգել ենք՝ արդյոք բջիջն օգտագործում է տվյալների վավերացում, թե ոչ՝ Target.SpecialCells ։

Հենց որ արժեքն ընտրվի, մենք անջատեցինք իրադարձությունները ( Application.EnableEvents = False ), այնպես որ փոփոխությունները չեն։ t կրկին ակտիվացնել իրադարձությունը: Այնուհետև ընտրված տարրը պահվեց Newvalue -ում:

Փոփոխությունը չեղարկելուց հետո մենք արժեքը սահմանեցինք Oldvalue : Հետո ստուգեք՝ Oldvalue դատարկ է, թե ոչ: Եթե ​​դատարկ է (նշանակում է, որ ընտրված է միայն մեկ արժեք), ապա վերադարձրեք Newvalue : Հակառակ դեպքում, միացրեք Oldvalue -ը և Newvalue -ը:

Նախքան վերակայումը ավարտելը իրադարձությունը, որպեսզի անհրաժեշտության դեպքում կարողանանք փոխել:

Կարդալ ավելին. Բազմաթիվ կախված բացվող ցանկ Excel VBA

2. Ընտրեք Բազմաթիվ Նյութեր Բացվող Ցանկից (Միայն Եզակի ընտրություն)

Վաղ բաժնում , մենք տեսել ենք բազմաթիվ ընտրություն, որտեղ կրկնությունը թույլատրվում էր: Եթե ​​դուք դա չեք ցանկանում, ապա հետևեք այս բաժնին:

Հարմարության համար մենք օգտագործեցինք առանձին թերթիկ այս ցուցադրման համար: Այս անգամ մենք Sheet3-ում ենք: Այս թերթի կոդի պատուհանում գրեք հետևյալ կոդը:

2623

Կա՞ որևէ տարբերություն նախկին կոդի համեմատ: Ավելի ուշադիր նայեք, դուք կկարողանաք նկատել աննշան տարբերությունը:

Այստեղ մենք օգտագործել ենք VBA ֆունկցիան, որը կոչվում է. INSTR : INSTR ֆունկցիան վերադարձնում է ենթատողի առաջին հայտնվելու դիրքը տողի մեջ: Լրացուցիչ տեղեկությունների համար այցելեք այս INSTR հոդվածը:

Օգտագործելով այս տրամաբանական գործողությունը InStr(1, Oldvalue, Newvalue) = 0-ով, մենք ստուգել ենք՝ արդյոք արժեքները գտնվել են, թե ոչ: Եթե ​​տրամաբանական գործողությունը վերադարձնում է ՃԻՇՏ (ավելի վաղ չի գտնվել), ապա այն թույլ է տալիս ընտրել տարրը և միացնել ավելի վաղ արժեքին:

Պահպանեք կոդը և այժմ փորձեք ընտրել այն տարրը, որն արդեն կա: ընտրվել է:

Այստեղ մենք արդեն ընտրել ենք Մատիտ , եթե ուզում ենք նորից ընտրել, չենք կարող: Այն թույլ չի տալիս կրկնօրինակ արժեքներ:

Կարդալ ավելին. Ինչպես ստեղծել բացվող ցուցակ մեկ այլ թերթից Excel-ում

3. Ընտրել Նյութեր Newline-ում

Առայժմ մենք գտել ենք, որ տարրերն առանձնացված են ստորակետով: Այս բաժնում մենք ընտրված տարրերը կդասավորենք նոր տողերով:

Պարզության համար մենք միացնում ենք մի քանի բջիջ D4 բջիջի հետ: Դա անելու համար ընտրեք այն բջիջները, որոնք ցանկանում եք միավորել և սեղմել Միաձուլել & Կենտրոնացեք Հավասարեցում բաժնից Տուն ներդիրից:

Բջիջը ավելի մեծ բարձրություն կստանա:

Այժմ եկեք նայենք նոր տողի միջոցով տարրերը բաժանելու կոդը: Օգտագործեք հետևյալ կոդը

2096

Նախորդ կոդից միակ տարբերությունն այն է, որ այս անգամ մենք օգտագործեցինք vbNewLine OldValue և միջակայքում: NewValue :

vbNewLine ապահովում է նոր տող տարրերի միջև:

Այժմ ընտրեք տարրերը:

Մենք ընտրում ենք մի տարր Գրիչ , որը երևում է վերևի նկարում: Այժմ ընտրեք մեկ այլ տարր:

Դուք կտեսնեք, որ երկու տարրերը տարբեր տողերում են:

Այստեղ մենք ունենք երկու արժեքներ, որոնք գտնվում են երկու տարբեր տողերում: Մեկ այլ արժեք ընտրելով այն կավելացվի մեկ այլ տողում: Յուրաքանչյուր արժեք կլինի նոր տողում:

Նշեք, որ եթե ցանկանում եք, որ մեկ այլ սահմանազատիչ տարանջատի տարրերը, օգտագործեք այն կրկնակի չակերտների մեջ vbNewline<10-ի փոխարեն:>.

Եզրակացություն

Այսքանը այսօրվա համար: Մենք թվարկել ենք մի քանի մոտեցումներ՝ բացվող ցուցակում մի քանի ընտրություն կատարելու համար: Հուսով եմ, որ սա օգտակար կգտնեք: Ազատորեն մեկնաբանեք, եթե ինչ-որ բան դժվար է թվում հասկանալ: Տեղեկացրեք մեզ ցանկացած այլ մեթոդ, որը մենք բաց ենք թողել այստեղ: