Ինչպե՞ս հեռացնել կրկնօրինակները, բայց Excel- ում պահպանել առաջին ատյանները:
Ասենք, ձեր աշխատաթերթում կա արժեքների ցուցակ, որը պարունակում է մի քանի կրկնօրինակ, այժմ դուք պետք է հեռացնեք կրկնօրինակները, բայց պահեք առաջին շարքը, որտեղ հայտնաբերվում է կրկնօրինակ արժեքը: Այս հոդվածում մենք ձեզ ցույց կտանք կրկնօրինակները հեռացնելու երկու մեթոդ, բայց առաջին ատյանը պահեք Excel- ում:
Հեռացրեք կրկնօրինակները, բայց պահեք առաջին ատյանները VBA կոդով
Հեռացրեք կրկնօրինակները, բայց պահեք առաջին օրինակը Kutools- ի համար Excel- ի համար
Հեռացրեք կրկնօրինակները, բայց պահեք առաջին ատյանները VBA կոդով
Կրկնօրինակները հեռացնելու համար կարող եք գործարկել ստորև ներկայացված VBA կոդը, բայց առաջին ատյանը պահել սյունակում:
1. Մամուլ ալտ + F11 բացելու համար Microsoft Visual Basic հավելվածների համար երկխոսության վանդակում:
2. Մեջ Microsoft Visual Basic հավելվածների համար երկխոսության վանդակում, սեղմեք Տեղադրել > Մոդուլներ, Դրանից հետո պատճենեք և տեղադրեք ներքևի կոդը ծածկագրի պատուհանում:
VBA կոդ. Հեռացնել կրկնօրինակները, բայց պահպանել առաջին ատյանները
Sub TrimExcessSpaces()
Dim Rng As Range
Dim WorkRng As Range
Dim dic As Variant
Set dic = CreateObject("Scripting.Dictionary")
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
Set WorkRng = WorkRng.Columns(1)
For Each Rng In WorkRng.Cells
dic(Rng.Value) = ""
Next
WorkRng.ClearContents
WorkRng.Range("A1").Resize(UBound(dic.Keys) + 1, 1) = Application.WorksheetFunction.Transpose(dic.Keys)
End Sub
3. Մամուլ F5 ծածկագիրը գործելու համար: Պատուհանման մեջ KutoolsforExcel երկխոսության տուփ, ընտրեք այն տիրույթը, որը ցանկանում եք հեռացնել կրկնօրինակները, և այնուհետև կտտացրեք այն OK կոճակ Տեսեք,
Այժմ դուք կարող եք տեսնել բոլոր կրկնօրինակ շարքերը, բացառությամբ որ առաջին գրառումները հանվում են ընտրված սյունակի տիրույթից: Տեսեք,
Հեռացրեք կրկնօրինակները, բայց պահեք առաջին օրինակը Kutools- ի համար Excel- ի համար
VBA կոդից բացի կարող եք օգտագործել այն Ընտրեք Կրկնօրինակ և եզակի բջիջներ օգտակարությունը Excel- ի համար նախատեսված գործիքներ լրացում ՝ կրկնօրինակները հեշտությամբ հեռացնելու համար, բայց առաջին օրինակները Excel- ում պահելու համար:
Նախքան դիմելը Excel- ի համար նախատեսված գործիքներ, խնդրում եմ նախ ներբեռնեք և տեղադրեք այն.
1. Ընտրեք այն տիրույթը, որը ցանկանում եք հեռացնել կրկնօրինակները, բայց պահեք առաջին ատյանները: Դրանից հետո կտտացրեք Կուտոլս > ընտրել > Ընտրեք Կրկնօրինակ և եզակի բջիջներ.
2. Մեջ Ընտրեք Կրկնօրինակ և եզակի բջիջներ երկխոսության տուփ, ընտրեք Կրկնօրինակներ (բացառությամբ 1-ին) տարբերակը, ապա կտտացրեք OK կոճակ Տեսեք,
3. Հաջորդում Ընտրեք Կրկնօրինակ և եզակի բջիջներ երկխոսության վանդակում, սեղմեք OK.
4. Այժմ կրկնօրինակներն ընտրված են, բացառությամբ առաջին ատյանների, սեղմեք կոճակը ջնջել ընտրված կրկնօրինակները հեռացնելու բանալին:
ՆշումԵթե ցանկանում եք ջնջել կրկնօրինակ տողերը, ապա պարզապես անհրաժեշտ է ստուգել Ընտրեք ամբողջ տողերը տարբերակը Ընտրեք Կրկնօրինակ և եզակի բջիջներ երկխոսության տուփ, ապա կիրառել ջնջել աջ կտտոցի ընտրացանկի հրամանը `ամբողջ կրկնօրինակ շարքերը հեռացնելու համար:
Եթե ցանկանում եք ունենալ այս օգտակար ծառայության անվճար փորձարկում (30-օրյա), խնդրում ենք կտտացնել այն ներբեռնելու համար, և այնուհետև անցեք գործողությունը կիրառելու վերը նշված քայլերին համապատասխան:
Հեռացրեք կրկնօրինակները, բայց պահեք առաջին օրինակը Kutools- ի համար Excel- ի համար
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: