Ինչպես ջնջել յուրաքանչյուր մյուս տողը կամ յուրաքանչյուր n-րդ տողը Excel-ում

Michael Brown

26-06-2023 Excel
  • Կիսվել Սա
Michael Brown

Այս կարճ ձեռնարկը բացատրում է, թե ինչպես ջնջել Excel-ի մյուս տողերը՝ զտելով կամ VBA կոդով: Դուք նաև կսովորեք, թե ինչպես հեռացնել յուրաքանչյուր 3-րդ, 4-րդ կամ ցանկացած այլ N-րդ տող:

Կան բազմաթիվ իրավիճակներ, երբ ձեզ կարող է անհրաժեշտ լինել ջնջել այլընտրանքային տողերը Excel-ի աշխատաթերթերում: Օրինակ, դուք կարող եք տվյալները պահել զույգ շաբաթների ընթացքում (տողեր 2, 4, 6, 8 և այլն) և տեղափոխել բոլոր կենտ շաբաթները (տողեր 3, 5, 7 և այլն) մեկ այլ թերթիկ:

Ընդհանրապես, Excel-ում յուրաքանչյուր մյուս տող ջնջելը հանգում է այլընտրանքային տողերի ընտրությանը: Երբ տողերը ընտրվեն, միայն մեկ հարված է պահանջվում Ջնջել կոճակի վրա: Հետագայում այս հոդվածում դուք կսովորեք մի քանի տեխնիկա Excel-ում յուրաքանչյուր մյուս կամ յուրաքանչյուր N-րդ տող արագ ընտրելու և ջնջելու համար:

    Ինչպես ջնջել յուրաքանչյուր մյուս տող Excel-ում՝ զտելով

    Ըստ էության, Excel-ի բոլոր մյուս տողերը ջնջելու սովորական եղանակը հետևյալն է. սկզբում դուք զտում եք այլընտրանքային տողերը, այնուհետև ընտրում դրանք և միանգամից ջնջում: Մանրամասն քայլերը հետևում են ստորև.

    1. Ձեր սկզբնական տվյալների կողքին գտնվող դատարկ սյունակում մուտքագրեք զրոների և միավորների հաջորդականությունը: Դուք կարող եք արագ դա անել՝ մուտքագրելով 0 առաջին բջիջում և 1՝ երկրորդ բջիջում, այնուհետև պատճենելով առաջին երկու բջիջները և դրանք կպցնելով սյունակում մինչև տվյալների վերջին բջիջը:

      Այլապես կարող եք օգտագործել այս բանաձևը.

      =MOD(ROW(),2)

      Բանաձևի տրամաբանությունը շատ պարզ է. ROW ֆունկցիան վերադարձնում է ընթացիկ տողի համարը, MOD ֆունկցիան:բաժանում է այն 2-ի և վերադարձնում մնացորդը՝ կլորացված ամբողջ թվին:

      Արդյունքում, դուք ունեք 0 բոլոր զույգ տողերում (քանի որ դրանք հավասարապես բաժանվում են 2-ի առանց մնացորդի) և 1 բոլոր կենտ տողերում:

    2. Կախված նրանից, թե ցանկանում եք ջնջել զույգ կամ կենտ տողերը, զտեք միավորները կամ զրոները:

      Դա անելու համար ընտրեք ձեր Օգնական սյունակի ցանկացած բջիջ, գնացեք Տվյալներ ներդիր > Տեսակավորել և զտել խումբ և սեղմեք Զտիչ : կոճակը։ Բացվող ֆիլտրի սլաքները կհայտնվեն վերնագրի բոլոր բջիջներում: Դուք սեղմում եք «Օգնական» սյունակի սլաքի կոճակը և նշում վանդակներից մեկը.

      • 0՝ զույգ տողերը ջնջելու համար
      • 1 կենտ տողերը ջնջելու համար

      Այս օրինակում մենք պատրաստվում ենք հեռացնել «0» արժեք ունեցող տողերը, ուստի մենք դրանք զտում ենք.

    3. Այժմ, երբ բոլոր «1» տողերը թաքցված են, ընտրեք բոլոր տեսանելի «0» տողերը, աջ սեղմեք ընտրվածի վրա և սեղմեք Ջնջել տողը :

    4. Վերոնշյալ քայլը ձեզ թողել է դատարկ աղյուսակ: , բայց մի անհանգստացեք, «1» տողերը դեռ կան։ Դրանք նորից տեսանելի դարձնելու համար պարզապես հեռացրեք ավտոմատ զտիչը՝ կրկին սեղմելով Filter կոճակը.

    5. C սյունակի բանաձևը վերահաշվում է մնացած տողերի համար, բայց դա ձեզ այլևս պետք չէ: Այժմ դուք կարող եք ապահով կերպով ջնջել «Օգնական» սյունակը.

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

    Հուշում. Եթե ​​ցանկանում եք տեղափոխել ամենմեկ այլ տող, այլ ոչ թե դրանք ամբողջությամբ ջնջեք, նախ պատճենեք զտված տողերը և տեղադրեք դրանք նոր վայրում, այնուհետև ջնջեք զտված տողերը:

    Ինչպես ջնջել այլընտրանքային տողերը Excel-ում VBA-ով

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

    Sub Delete_Alternate_Rows_Excel() Dim SourceRange As Range Set SourceRange: = Application.Selection Set SourceRange = Application.InputBox( "Range:" , "Select the range" , SourceRange.Address, Type :=8) If SourceRange.Rows.Count >= 2 Ապա Dim FirstCell As Range Dim RowIndex as integer Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) Դեպի 1 քայլ -2 Սահմանել FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Deleteing Next Truepdplication. End If End Sub

    Ինչպես ջնջել Excel-ի բոլոր մյուս տողերը՝ օգտագործելով մակրո

    I Տեղադրեք մակրոն ձեր աշխատաթերթում սովորական ձևով Visual Basic խմբագրիչի միջոցով.

    1. Սեղմեք Alt + F11՝ Visual Basic հավելվածների պատուհանը բացելու համար:
    2. Վերևի մենյուի տողում, սեղմեք Տեղադրեք > Մոդուլ և տեղադրեք վերը նշված մակրոն Մոդուլում
    3. Սեղմեք F5 ստեղնը մակրո գործարկելու համար:
    4. Կբացվի երկխոսություն և կառաջարկի ձեզ ընտրել տիրույթ: Ընտրեք ձեր աղյուսակը և սեղմեքԼավ:

    Կատարված է: Ընտրված տիրույթի բոլոր մյուս տողերը ջնջվում են.

    Ինչպես ջնջել յուրաքանչյուր N-րդ տողը Excel-ում

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

    MOD(ROW()- m, n)

    Որտեղ:

    • m առաջին բջիջի տողի համարն է՝ մինուս 1
    • n N-րդ տողն է, որը ցանկանում եք ջնջել

    Ենթադրենք, ձեր տվյալները սկսվում են 2-րդ շարքից, և դուք ցանկանում եք ջնջել յուրաքանչյուր 3-րդ տողը: Այսպիսով, ձեր բանաձևում n հավասար է 3, իսկ m հավասար է 1-ի (տող 2 հանած 1):

    =MOD(ROW() - 1, 3)

    Եթե մեր տվյալները սկսվել են 3-րդ շարքը, ապա m կհավասարվի 2-ի (3-րդ շարքը հանած 1) և այլն: Այս ուղղումն անհրաժեշտ է տողերը հաջորդաբար համարակալելու համար՝ սկսած 1 թվից:

    Բանաձևն այն է, որ հարաբերական տողի թիվը բաժանում է 3-ի և վերադարձնում մնացածը բաժանումից հետո: Մեր դեպքում այն ​​տալիս է զրո յուրաքանչյուր երրորդ տողի համար, քանի որ յուրաքանչյուր երրորդ թիվը բաժանվում է 3-ի առանց մնացորդի (3,6,9 և այլն):

    Եվ հիմա, դուք կատարեք արդեն ծանոթ քայլերը՝ «0» տողերը զտելու համար.

    1. Ընտրեք ձեր աղյուսակի ցանկացած բջիջ և սեղմեք Զտիչ կոճակը Տվյալներ
    2. Զտեք Օգնականի սյունակը միայն «0» արժեքները ցուցադրելու համար:
    3. Ընտրեք բոլոր տեսանելի «0» տողերը, սեղմեք աջը և ընտրեք Ջնջել տողը համատեքստի ընտրացանկից:
    4. Հեռացրեք ֆիլտրը ևջնջեք Helper սյունակը:

    Նման ձևով կարող եք ջնջել Excel-ի յուրաքանչյուր 4-րդ, 5-րդ կամ ցանկացած այլ N-րդ տող:

    Հուշում. Այն դեպքում, երբ դուք պետք է հեռացնեք անհամապատասխան տվյալներ ունեցող տողերը, հետևյալ ուղեցույցը օգտակար կլինի. Ինչպես ջնջել տողերը՝ հիմնված բջջի արժեքի վրա:

    Շնորհակալ եմ կարդալու համար և հուսով եմ, որ հաջորդ շաբաթ ձեզ նորից կտեսնենք մեր բլոգում: .

    Նախորդ գրառումը Excel հղում մեկ այլ թերթիկի կամ աշխատանքային գրքի (արտաքին հղում)
    Հաջորդ գրառումը Ինչպես հաշվարկել տարբերությունը Excel-ում – նմուշ & բնակչության շեղումների բանաձևը

    Մայքլ Բրաունը նվիրված տեխնոլոգիայի էնտուզիաստ է, որը ձգտում է պարզեցնել բարդ գործընթացները՝ օգտագործելով ծրագրային գործիքները: Տեխնոլոգիական ոլորտում ավելի քան մեկ տասնամյակ փորձ ունենալով՝ նա կատարելագործել է իր հմտությունները Microsoft Excel-ում և Outlook-ում, ինչպես նաև Google Sheets-ում և Docs-ում: Մայքլի բլոգը նվիրված է իր գիտելիքներն ու փորձառությունը ուրիշների հետ կիսելուն՝ տրամադրելով հեշտ օգտագործվող խորհուրդներ և ձեռնարկներ՝ արտադրողականությունն ու արդյունավետությունը բարձրացնելու համար: Անկախ նրանից, թե դուք փորձառու մասնագետ եք, թե սկսնակ, Մայքլի բլոգը առաջարկում է արժեքավոր պատկերացումներ և գործնական խորհուրդներ՝ առավելագույն օգուտ քաղելու այս կարևոր ծրագրային գործիքներից: