Змест
Гэты кароткі падручнік тлумачыць, як выдаліць усе астатнія радкі ў Excel шляхам фільтрацыі або з дапамогай кода VBA. Вы таксама даведаецеся, як выдаляць кожны 3-ці, 4-ы ці любы іншы N-ты радок.
Ёсць шмат сітуацый, калі вам можа спатрэбіцца выдаліць альтэрнатыўныя радкі ў працоўных лістах Excel. Напрыклад, вы можаце захаваць даныя за цотныя тыдні (радкі 2, 4, 6, 8 і г.д.) і перанесці ўсе няцотныя тыдні (радкі 3, 5, 7 і г.д.) на іншы аркуш.
Як правіла, выдаленне кожнай другой радкі ў Excel зводзіцца да выбару альтэрнатыўных радкоў. Пасля таго, як радкі выбраны, дастаткова націснуць кнопку Выдаліць . Далей у гэтым артыкуле вы даведаецеся некалькі метадаў хуткага выбару і выдалення кожнага другога або кожнага N-га радка ў Excel.
Як выдаліць кожны другі радок у Excel шляхам фільтрацыі
Па сутнасці, звычайны спосаб сцерці кожны другі радок у Excel такі: спачатку вы адфільтроўваеце альтэрнатыўныя радкі, затым выбіраеце іх і выдаляеце ўсе адразу. Падрабязныя дзеянні прыведзены ніжэй:
- У пусты слупок побач з вашымі зыходнымі дадзенымі ўвядзіце паслядоўнасць нулёў і адзінак. Вы можаце хутка зрабіць гэта, увёўшы 0 у першую ячэйку і 1 у другую ячэйку, затым скапіяваўшы дзве першыя ячэйкі і ўставіўшы іх у слупок да апошняй ячэйкі з дадзенымі.
У якасці альтэрнатывы вы можаце выкарыстоўваць наступную формулу:
=MOD(ROW(),2)Логіка формулы вельмі простая: функцыя ROW вяртае нумар бягучага радка, а функцыя MODдзеліць яго на 2 і вяртае рэшту, акругленую да цэлага ліку.
У выніку ў вас ёсць 0 ва ўсіх цотных радках (таму што яны дзеляцца на 2 раўнамерна без астатку) і 1 ва ўсіх няцотных радках:
Глядзі_таксама: Як выкарыстоўваць пашыраны фільтр у Excel - прыклады дыяпазону крытэрыяў з формуламі
- У залежнасці ад таго, хочаце вы выдаліць цотныя або няцотныя радкі, адфільтруйце адзінкі або нулі.
Каб зрабіць гэта, абярыце любую ячэйку ў слупку Helper, перайдзіце на ўкладку Data > Sort and Filter і націсніце Filter кнопка. Стрэлкі выпадальнага фільтра з'явяцца ва ўсіх ячэйках загалоўкаў. Вы націскаеце кнопку са стрэлкай у слупку Helper і ставіце галачку ў адным з сцяжкоў:
- 0, каб выдаліць цотныя радкі
- 1, каб выдаліць няцотныя радкі
У гэтым прыкладзе мы збіраемся выдаліць радкі са значэннямі "0", таму мы адфільтруем іх:
- Цяпер, калі ўсе радкі "1" схаваны, выберыце ўсе бачныя радкі "0", пстрыкніце вылучэнне правай кнопкай мышы і націсніце Выдаліць радок :
- Вышэйпрыведзены крок пакінуў у вас пустую табліцу , але не хвалюйцеся, радкі "1" усё яшчэ ёсць. Каб зноў зрабіць іх бачнымі, проста выдаліце аўтаматычны фільтр, націснуўшы кнопку Фільтр яшчэ раз:
- Формула ў слупку C пералічвае для астатніх радкоў, але вам гэта больш не трэба. Цяпер вы можаце бяспечна выдаліць слупок Helper:
У выніку ў нашым аркушы засталіся толькі цотныя тыдні, а няцотныя тыдні зніклі!
Савет. Калі вы хочаце рухацца кожныіншы радок у іншае месца, а не выдаляць іх цалкам, спачатку скапіруйце адфільтраваныя радкі і ўстаўце іх у новае месца, а потым выдаліце адфільтраваныя радкі.
Як выдаліць альтэрнатыўныя радкі ў 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 Then Dim FirstCell As Range Dim RowIndex As Integer Application.ScreenUpdating = False For RowIndex = SourceRange.Rows.Count - (SourceRange.Rows.Count Mod 2) To 1 Step -2 Set FirstCell = SourceRange.Cells(RowIndex, 1) FirstCell.EntireRow.Delete Next Application.ScreenUpdating = True End If End SubЯк выдаліць кожны другі радок у Excel з дапамогай макраса
I устаўце макрас у ваш аркуш звычайным спосабам праз рэдактар Visual Basic:
- Націсніце Alt + F11, каб адкрыць акно Visual Basic для прыкладанняў.
- У верхняй радку меню, пстрыкніце Уставіць > Модуль і ўстаўце прыведзены вышэй макрас у Модуль
- Націсніце клавішу F5, каб запусціць макрас.
- Усплыве дыялогавае акно з прапановай выбраць дыяпазон. Выберыце стол і націсніцеOK:
Гатова! Кожны іншы радок у выбраным дыяпазоне выдаляецца:
Як выдаліць кожны N-ты радок у Excel
Для гэтай задачы мы збіраемся пашырыць фільтрацыю тэхніка, якую мы выкарыстоўвалі для выдалення кожнага другога радка. Розніца заключаецца ў формуле, на якой грунтуецца фільтраванне:
MOD(ROW()- m, n)Дзе:
- m - гэта нумар радка першай ячэйкі з дадзенымі мінус 1
- n - гэта N-ы радок, які вы хочаце выдаліць
Дапусцім, вашы дадзеныя пачынаюцца ў радку 2, і вы хочаце выдаліць кожны трэці радок. Такім чынам, у вашай формуле n роўна 3, а m роўна 1 (радок 2 мінус 1):
=MOD(ROW() - 1, 3)
Калі нашы даныя пачынаюцца ў радок 3, тады m будзе роўна 2 (радок 3 мінус 1), і гэтак далей. Гэта выпраўленне неабходна для паслядоўнай нумарацыі радкоў, пачынаючы з лічбы 1.
Формула дзеліць адносны нумар радка на 3 і вяртае астатак пасля дзялення. У нашым выпадку гэта дае нуль для кожнага трэцяга радка, таму што кожны трэці лік дзеліцца на 3 без астатку (3,6,9 і г.д.):
А цяпер вы выканайце ўжо знаёмыя дзеянні, каб адфільтраваць радкі "0":
- Выберыце любую ячэйку ў вашай табліцы і націсніце кнопку Фільтр на Дадзеныя
- Адфільтруйце слупок "Дапаможнік", каб паказаць толькі значэнні "0".
- Абярыце ўсе бачныя радкі "0", пстрыкніце правай кнопкай мышы і абярыце Выдаліць радок з кантэкстнага меню.
- Зніміце фільтр івыдаліце слупок Helper.
Аналагічным чынам вы можаце выдаліць кожную 4-ю, 5-ю або любую іншую N-ю радок у Excel.
Парада. У выпадку, калі вам трэба выдаліць радкі з недарэчнымі дадзенымі, наступны падручнік будзе карысным: Як выдаліць радкі на аснове значэння ячэйкі.
Я дзякую вам за прачытанне і спадзяюся зноў убачыць вас у нашым блогу на наступным тыдні .
