Excel- ում բացվող ցուցակից ինչպե՞ս ընտրել մի քանի իրեր:

Բացվող ցուցակը հաճախ օգտագործվում է Excel- ի ամենօրյա աշխատանքում: Լռելյայնորեն, միայն մեկ տարր կարող է ընտրվել բացվող ցուցակում: Բայց որոշ ժամանակներում կարող է անհրաժեշտ լինել բացվող ցուցակից մի քանի տարր ընտրել մեկ մեկ բջիջում, ինչպես ցույց է տրված նկարում: Ինչպե՞ս կարող եք այն կարգավորել Excel- ում:

Ընտրեք մի քանի տարրեր բացվող ցուցակից VBA- ով բջիջ

Ընտրեք բազմաթիվ տարրեր բացվող ցուցակից բջիջով Kutools- ի համար Excel- ի հարմար տարբերակը

Ընտրեք մի քանի տարրեր բացվող ցուցակից VBA- ով բջիջ

Ահա մի քանի VBA- ն կարող է լավություն ցուցաբերել ձեզ այս աշխատանքը լուծելու հարցում:

Բջջի բացվող ցուցակից ընտրեք կրկնօրինակ իրեր

1. Բացվող ցուցակ ստեղծելուց հետո ընտրելու համար աջ կտտացրեք թերթիկի ներդիրին Դիտել կոդը համատեքստի ընտրացանկից:

2. Հետո Microsoft Visual Basic հավելվածների համար պատուհանը, պատճենեք և տեղադրեք կոդը ներքևում դատարկ սցենարում:

VBA. Բջջի բացվող ցուցակից ընտրեք բազմաթիվ իրեր

Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyExtendoffice20221111
    Dim xRgVal As Range
    Dim xStrNew As String
    On Error Resume Next
    Set xRgVal = Cells.SpecialCells(xlCellTypeAllValidation)
    If (Target.Count > 1) Or (xRgVal Is Nothing) Then Exit Sub
    If Intersect(Target, xRgVal) Is Nothing Then Exit Sub
    If Target.Value = "" Then Exit Sub
    Application.EnableEvents = False
    xStrNew = Target.Value
    Application.Undo
    If xStrNew = Target.Value Then
    Else
    xStrNew = xStrNew & " " & Target.Value
    Target.Value = xStrNew
    End If
    Application.EnableEvents = True
End Sub

3. Պահեք կոդը և փակեք պատուհանը ՝ բացվող ցուցակին վերադառնալու համար: Այժմ բացվող ցանկից կարող եք ընտրել բազմաթիվ իրեր:

Նշում.

1. VBA- ի միջոցով այն իրերն առանձնացնում է ըստ տարածության, կարող ես փոխել xStrNew = xStrNew & "" & Նպատակ. Արժեք ուրիշներին `սահմանը փոխելու համար, ինչպես ձեզ հարկավոր է: Օրինակ, xStrNew = xStrNew & "," & Նպատակ. Արժեք կետերը բաժանելու են ստորակետերով:

2. Այս VBA կոդը աշխատում է թերթի բոլոր բացվող ցուցակների համար:

Առանց կրկնության բացվող ցուցակից բջիջ ընտրեք բազմաթիվ իրեր

Եթե ​​պարզապես ուզում եք բացվող ցուցակից բջիջ ընտրել եզակի իրեր, կարող եք կրկնել վերը նշված քայլերը և օգտագործել ներքևի կոդը:

VBA without առանց կրկնության ընտրեք մի քանի տարր բացվող ցուցակից դեպի բջիջ

Private Sub Worksheet_Change(ByVal Target As Range)
'UpdatebyExtendoffice20221111
    Dim I As Integer
    Dim xRgVal As Range
    Dim xStrNew As String
    Dim xStrOld As String
    Dim xFlag As Boolean
    Dim xArr
    On Error Resume Next
    Set xRgVal = Cells.SpecialCells(xlCellTypeAllValidation)
    If (Target.Count > 1) Or (xRgVal Is Nothing) Then Exit Sub
    If Intersect(Target, xRgVal) Is Nothing Then Exit Sub
    If Target.Value = "" Then Exit Sub
    Application.EnableEvents = False
    xFlag = True
    xStrNew = " " & Target.Value & " "
    Application.Undo
    xStrOld = Target.Value
    If InStr(1, xStrOld, xStrNew) = 0 Then
        xStrNew = xStrNew & xStrOld & " "
    Else
        xStrNew = xStrOld
    End If
    Target.Value = xStrNew
    Application.EnableEvents = True
End Sub

Երկու վերը նշված VBA կոդերը չեն կարող ջնջել բջիջի բովանդակության մասերը, միայն աջակցում են բջիջի բոլոր տարրերը մաքրելու համար:

Ընտրեք բազմաթիվ տարրեր բացվող ցուցակից բջիջով Kutools- ի համար Excel- ի հարմար տարբերակը

Եթե ​​ծանոթ չեք VBA կոդին, կարող եք անվճար տեղադրում հարմար գործիք - Excel- ի համար նախատեսված գործիքներ, որը պարունակում է մի խումբ կոմունալ ծառայություններ բացվող ցուցակի մասին, և կա մի տարբերակ Բազմակի ընտրության Բացվող ցուցակ կօգնի ձեզ բացվող ցուցակից մի քանի տարր հեշտությամբ ընտրել բջիջ:

Բացվող ցուցակը ստեղծելուց հետո ընտրեք բացվող ցուցակի բջիջները և կտտացրեք Կուտոլս > Բացվող ցուցակ > Բազմակի ընտրության Բացվող ցուցակ միացնել այս օգտակար ծրագիրը:

Այնուհետև ընտրված բացվող ցուցակի բջիջները կարող են ընտրվել բջիջների բազմաթիվ տարրեր:

Եթե ​​առաջին անգամ օգտագործում եք այս տարբերակը, նախքան այս օգտակար ծրագիրը կիրառելը, կարող եք նշել այս օգտակար պարամետրերը, ինչպես ձեզ հարկավոր է:

Սեղմել Կուտոլս > Բացվող ցուցակ > կողքի սլաքը Բազմակի ընտրության Բացվող ցուցակ > Կարգավորումներ.

Այնուհետեւ Բազմակի ընտրությամբ Բացվող ցուցակի կարգավորումները երկխոսություն, կարող եք

1) նշեք կիրառման շրջանակը, որքան ձեզ հարկավոր է.

2) նշել կետի տեղանքի ուղղությունը.

3) նշեք տարանջատիչը իրերի միջև.

4) Նշեք, եթե կրկնօրինակներ չեն ավելացնում և չեն վերացնում կրկնօրինակ իրերը:

Սեղմել Ok եւ սեղմեք Կուտոլս > Բացվող ցուցակ > Բազմակի ընտրության Բացվող ցուցակ այն ուժի մեջ մտնելու համար:

ԱկնարկԿիրառել Բազմակի ընտրության Բացվող ցուցակ օգտակարություն, դուք պետք է տեղադրել դա սկզբում: Եթե ​​ցանկանում եք ստեղծել բացվող ցուցակ ՝ բազմաթիվ մակարդակներով, ստորև նշված օգտակար ծրագիրը կարող է օգնել ձեզ:

Excel- ում հեշտությամբ ստեղծեք դինամիկ 2-մակարդակի կամ բազմաստիճան կախված բացվող ցուցակ

Excel- ում 2 մակարդակի կամ բազմակի մակարդակի բացվող ցուցակ ստեղծելու համար բարդ է: Այստեղ Դինամիկ բացվող ցուցակ օգտակարությունը Excel- ի համար նախատեսված գործիքներ կարող է քեզ լավություն անել: Այն, ինչ դուք միայն պետք է անեք, պատվիրել տվյալները, ինչպես ցույց է տրված օրինակում, ապա ընտրել տվյալների տիրույթն ու ելքային միջակայքը, ապա թողնել այն օգտակար ծառայությանը:  Կտտացրեք 30 օր անվճար փորձարկում!

Kutools Excel-ի համար. ավելի քան 300 հարմար Excel հավելումներով, անվճար փորձելու առանց սահմանափակման 30 օր.

---

Գրասենյակի արտադրողականության լավագույն գործիքները

Excel-ի համար Kutools-ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80%-ով

• Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
• Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
• Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
• Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
• Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
• Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
• Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
• Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
• Ավելի քան 300 հզոր հատկություններ. Աջակցում է Office / Excel 2007-2021 և 365: Աջակցում է բոլոր լեզուներին: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հնարավորություններ 30-օրյա անվճար փորձարկում: 60-օրյա գումարի վերադարձի երաշխիք:

Կարդալ ավելին... Անվճար ներբեռնում... Գնեք ... 

---

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

• Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
• Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
• Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:

Կարդալ ավելին... Անվճար ներբեռնում... Գնեք ...