Ինչպե՞ս հեռացնել կրկնօրինակ շարքերը, բայց պահպանել Excel- ում վերջին ամսաթվով մեկը:

Ես ունեմ տվյալների մի շարք, որոնք պարունակում են A կրկնակի արժեքներ A սյունակում, և B սյունակում բնակեցված է ինչ-որ ամսաթվով, այժմ ես պետք է հեռացնեմ A սյունակի կրկնօրինակ շարքերը, բայց համապատասխան սյունակից պահեմ վերջին ամսաթիվը, ինչպես ցույց է տրված հետևյալ նկարը , ունեք լավ գաղափարներ Excel- ում այս խնդիրը արագ և հեշտ լուծելու համար:

Հեռացրեք կրկնօրինակ արժեքները և պահեք ամենաթարմ ամսաթիվը VBA կոդով մեկ այլ սյունակում

Հեռացրեք կրկնօրինակ արժեքները և պահեք ամենաթարմ ամսաթիվը Excel- ի համար այլ սյունակում

Հեռացրեք կրկնօրինակ արժեքները և պահեք ամենաթարմ ամսաթիվը VBA կոդով մեկ այլ սյունակում

Հաջորդ VBA կոդը կարող է օգնել ձեզ հեռացնել կրկնօրինակ բջիջները և պահպանել վերջին ամսաթիվը մեկ այլ սյունակից, խնդրում ենք անել հետևյալը.

1, Պահեք պահեք ALT + F11 ստեղները, և այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.

2: Սեղմեք Տեղադրել > Մոդուլներ, ապա տեղադրեք հետևյալ մակրոը Մոդուլներ Պատուհանը:

VBA կոդ. Հեռացրեք կրկնօրինակ արժեքները և պահեք ամենաթարմ ամսաթիվը

Sub test()
'updateby Extendoffice 
    Dim xRng As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = Application.ActiveWindow.RangeSelection.Address
    Set xRng = Application.InputBox("please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRng Is Nothing Then Exit Sub
    If (xRng.Columns.Count < 2) Or (xRng.Rows.Count < 2) Then
        MsgBox "the used range is invalid", , "Kutools for Excel"
        Exit Sub
    End If
    xRng.Sort key1:=xRng.Cells(1, 1), Order1:=xlAscending, key2:=xRng.Cells(1, 2), Order2:=xlDescending, Header:=xlGuess
    xRng.RemoveDuplicates Columns:=1, Header:=xlGuess
End Sub

3. Այնուհետեւ սեղմեք F5 Այս կոդը կատարելու բանալին, և կհայտնվի հուշման տուփ ՝ հիշեցնելու համար, որ ընտրեք տվյալների տիրույթը, որը ցանկանում եք օգտագործել: Տեսեք,

4. Եվ այնուհետեւ կտտացրեք OK, A սյունակի կրկնօրինակ արժեքները հանվել են, և B սյունակի վերջին ամսաթիվը պահվում է ըստ ձեզ անհրաժեշտի: Տեսեք,

ՆշումՎերոհիշյալ կոդը հաջողությամբ կիրառելու համար սյունակը, որը պարունակում է կրկնօրինակ արժեքներ, պետք է տեղակայված լինի ամսաթվի սյունակի ձախ կողմում:

Հեռացրեք կրկնօրինակ արժեքները և պահեք ամենաթարմ ամսաթիվը Excel- ի համար այլ սյունակում

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

Տեղադրելուց հետո Excel- ի համար նախատեսված գործիքներխնդրում եմ արեք հետևյալը.

1, Ընտրեք տվյալների տիրույթը, որը ցանկանում եք հեռացնել կրկնօրինակները և պահպանել ամենաթարմ ամսաթիվը մեկ այլ սյունակից:

2. Այնուհետեւ կտտացրեք Կուտոլս > Միաձուլում և պառակտում > Ընդլայնված կոմբինատ տողեր, տես նկարի նկարը.

3, Մեջ Միավորել շարքերը ՝ հիմնվելով սյունակի վրա երկխոսության տուփ, կտտացրեք սյունակի անունը, որը ցանկանում եք հեռացնել կրկնօրինակ արժեքները, ապա կտտացրեք Հիմնական բանալին, տես նկարի նկարը.

4, Անցեք կտտացնելով մեկ այլ սյունակի անվանը, որը ցանկանում եք պահպանել ամենաթարմ ամսաթիվը, և այնուհետև կտտացրեք Հաշվել > Max, տես նկարի նկարը.

5. Եվ այնուհետեւ կտտացրեք Ok այս երկխոսությունը փակելու կոճակը, և այժմ կտեսնեք, որ Ա սյունակի կրկնօրինակ անունները հանված են և միայն համապատասխան սյունակում պահեք վերջին ամսաթիվը, տես նկարի նկարը.

Ներբեռնեք և անվճար փորձեք Kutools- ը Excel- ի համար:

Դեմո. Հեռացրեք կրկնօրինակ արժեքները և պահեք ամենաթարմ ամսաթիվը Excel- ի համար այլ սյունակում

---

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

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%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:

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