Ինչպե՞ս vlookup և վերադարձնել բազմաթիվ արժեքներ առանց կրկնօրինակների Excel- ում:
Երբեմն գուցե ցանկանաք դիտել և միանգամից մի քանի համապատասխան արժեքներ վերադարձնել մեկ բջիջ: Բայց եթե վերադարձված բջիջներում բնակեցված մի քանի կրկնվող արժեքներ կան, ինչպե՞ս կարող եք անտեսել կրկնօրինակները և միայն պահպանել եզակի արժեքները բոլոր համապատասխանող արժեքները վերադարձնելիս, ինչպես ցույց է տրված Excel- ում ցույց տրված հետևյալ նկարը:
Vlookup և վերադարձեք համապատասխանեցման բազմաթիվ արժեքներ առանց կրկնօրինակների ՝ օգտագործելով օգտագործողի կողմից սահմանված գործառույթը
Հետևյալ VBA կոդը կարող է օգնել ձեզ վերադարձնել համապատասխանեցման բազմաթիվ արժեքներ առանց կրկնօրինակների, արեք հետևյալ կերպ.
1, Պահեք պահեք Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.
2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլներ Պատուհանը:
VBA կոդ. Vlookup և վերադարձնել բազմաթիվ եզակի համապատասխանեցված արժեքներ.
Function MultipleLookupNoRept(Lookupvalue As String, LookupRange As Range, ColumnNumber As Integer)
Dim xDic As New Dictionary
Dim xRows As Long
Dim xStr As String
Dim i As Long
On Error Resume Next
xRows = LookupRange.Rows.Count
For i = 1 To xRows
If LookupRange.Columns(1).Cells(i).Value = Lookupvalue Then
xDic.Add LookupRange.Columns(ColumnNumber).Cells(i).Value, ""
End If
Next
xStr = ""
MultipleLookupNoRept = xStr
If xDic.Count > 0 Then
For i = 0 To xDic.Count - 1
xStr = xStr & xDic.Keys(i) & ","
Next
MultipleLookupNoRept = Left(xStr, Len(xStr) - 1)
End If
End Function
3, Կոդը տեղադրելուց հետո կտտացրեք Գործիքներ > Սայլակ բացվածում Microsoft Visual Basic հավելվածների համար պատուհանից, այնուհետև դուրս եկավ դուրս Հղումներ - VBAP նախագիծ երկխոսության տուփ, ստուգեք Microsoft Scripting Runtime տարբերակը Հասանելի հղումներ ցուցակի տուփ, տես նկարի նկարը.
4. Այնուհետեւ կտտացրեք OK երկխոսության տուփը փակելու, կոդի պատուհանը պահելու և փակելու համար, վերադառնալ աշխատանքային թերթ և մուտքագրել այս բանաձևը. =MultipleLookupNoRept(E2,A2:C17,3) դատարկ բջիջի մեջ, որտեղ ցանկանում եք արդյունքը դուրս բերել, սեղմեք Մտնել բանալին՝ անհրաժեշտության դեպքում ճիշտ արդյունք ստանալու համար: Տեսեք սքրինշոթը՝
ՆշումՎերոհիշյալ բանաձևում E2 այն չափորոշիչն է, որը ցանկանում եք փոփոխել, A2: C17 տվյալների տիրույթն է, որը ցանկանում եք օգտագործել, համարը 3 վերադարձված արժեքները պարունակող սյունակի համարն է:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: