Съдържание
В тази статия са изброени няколко начина за изтриване на редове в Excel въз основа на стойност на клетка. В тази публикация ще намерите бързи клавиши, както и Excel VBA. Изтрийте редовете автоматично или използвайте стандартната опция Find (Намери) в комбинация с полезни бързи клавиши.
Excel е перфектен инструмент за съхраняване на данни, които се променят от време на време. Актуализирането на таблицата ви след някои промени обаче може да изисква наистина много време. Задачата може да бъде толкова проста, колкото премахването на всички празни редове в Excel. Или може да се наложи да намерите и изтриете дублираните данни. Едно нещо, което знаем със сигурност, е, че винаги, когато идват или си отиват подробности, търсите най-доброто решение, което да ви помогне да спестите време на текущатаработа.
Например имате пазар, в който различни продавачи продават своите продукти. По някаква причина един от продавачите е затворил бизнеса си и сега трябва да изтриете всички редове, които съдържат името на продавача, дори ако са в различни колони.
В тази публикация ще намерите Excel VBA и преки пътища за изтриване на редове въз основа на определен текст или стойност. Ще видите как лесно да намерите и изберете необходимата информация, преди да я премахнете. Ако задачата ви не е свързана с изтриване, а с добавяне на редове, можете да намерите как да го направите в Най-бързите начини за вмъкване на няколко реда в Excel.
Най-бързият бърз клавиш на Excel за изтриване на редове в таблицата
Ако искате да използвате най-бързия метод за изтриване на няколко реда според стойността на клетката, която съдържат, първо трябва правилно да изберете тези редове.
За да изберете редовете, можете да маркирате съседните клетки с необходимите стойности и да щракнете върху Shift + Space или да изберете необходимите несъседни клетки, като държите натиснат клавиша Ctrl.
Можете също така да избирате цели редове с помощта на бутоните за номерата на редовете. Ще видите номера на маркираните редове до последния бутон.
След като изберете необходимите редове, можете бързо да ги премахнете, като използвате бързата клавишна комбинация на Excel "изтриване на ред". По-долу ще намерите как да се отървете от избраните редове, независимо дали имате стандартна таблица с данни, или таблица, която има данни вдясно.
Премахване на редове от цялата таблица
Ако имате прост списък в Excel, който няма допълнителна информация вдясно, можете да използвате бързия клавиш за изтриване на ред, за да премахнете редове в 2 лесни стъпки:
- Натиснете клавишната комбинация Ctrl + - (минус на основната клавиатура).
Неизползваните редове ще изчезнат мигновено.
Съвет. Можете да маркирате само диапазона, който съдържа стойностите, които искате да премахнете. След това използвайте прекия път Ctrl + - (минус на основната клавиатура) за да получите стандартния Excel Изтриване на диалогов прозорец, който ви позволява да изберете Целият ред или друга опция за изтриване, която може да ви е необходима.
Изтриване на редове, ако има данни в дясната част на таблицата
Ctrl + - (минус на основната клавиатура) - бързата клавишна комбинация на Excel е най-бързото средство за изтриване на редове. Ако обаче има някакви данни вдясно от основната таблица, както на снимката по-долу, може да се премахнат редове заедно с данните, които трябва да запазите.
В такъв случай трябва да форматирате данните си като Таблица на Excel първо.
- Натиснете Ctrl + T или отидете в Раздел Home -> Форматиране като таблица и изберете най-подходящия за вас стил.
Ще видите Създаване на таблица диалогов прозорец, който можете да използвате, за да маркирате необходимия диапазон.
Забележка: Моля, уверете се, че не използвате бутоните за редове, за да изберете цели редове.
Надявам се, че този пряк път "премахване на ред" ви е бил полезен. Продължете да четете, за да намерите Excel VBA за премахване на редове и да научите как да премахвате данни въз основа на определен текст в клетките.
Изтриване на редове, които съдържат определен текст в една колона
Ако елементите в редовете, които искате да премахнете, се появяват само в една колона, следващите стъпки ще ви помогнат да преминете през процеса на изтриване на редовете с такива стойности.
- Първо трябва да приложите филтър към таблицата си. За да направите това, отидете в Данни в Excel и щракнете върху Филтър икона.
Накрая кликнете върху Филтър отново, за да я изчистите, и ще видите, че редовете със стойностите са изчезнали от таблицата.
Как да премахнете редове в Excel по цвят на клетката
Опцията за филтриране позволява сортиране на данните въз основа на цвета на клетките. Можете да я използвате, за да изтриете всички редове, които съдържат определен цвят на фона.
- Направете заявка на Филтър на вашата маса. Отидете в Данни в Excel и щракнете върху Филтър икона.
Това е! Редовете с еднакво оцветени клетки се премахват за миг.
Изтриване на редове, които съдържат определен текст в различни колони
Ако стойностите, които искате да премахнете, са разпръснати в различни колони, сортирането може да усложни задачата. По-долу ще намерите полезен съвет за премахване на редове въз основа на клетките, които съдържат определени стойности или текст. От моята таблица по-долу искам да премахна всички редове, които съдържат януари, който се появява в 2 колони.
- Започнете да търсите и избирате клетките с необходимата стойност с помощта на Намиране и заместване диалогов прозорец. Щракнете върху Ctrl + F за да го стартирате.
Съвет. Същият диалогов прозорец можете да намерите, ако отидете в Начален раздел -> Намиране & Избор и изберете Намерете от падащия списък.
- Въведете необходимата стойност в полето Открийте какво и изберете всички допълнителни опции, ако е необходимо. След това натиснете Намерете всички за да видите резултата.
Изберете намерените стойности в прозореца, като запазите Ctrl Натиснете клавиша. Намерените стойности ще бъдат автоматично маркирани в таблицата.
Съвет. Можете да изтриете редовете с избраните стойности, ако натиснете Ctrl + - (минус на основната платка) и изберете радио бутона Цели редове .
Воала! Нежеланите редове са изтрити.
Макрос на Excel VBA за изтриване на редове или премахване на всеки втори ред
Ако винаги търсите решение за автоматизиране на тази или онази рутинна дейност в Excel, вземете макросите по-долу, за да оптимизирате задачата си за изтриване на редове. В тази част ще намерите 2 макроса VBA, които ще ви помогнат да премахнете редове с избраните клетки или да изтриете всеки друг ред в Excel.
Макросът RemoveRowsWithSelectedCells ще премахне всички редове, които съдържат поне една маркирана клетка.
Макросът RemoveEveryOtherRow както подсказва името му, ще ви помогне да се отървете от всеки втори/трети и т.н. ред според настройките ви. Той ще премахне редове, започващи от текущото местоположение на курсора на мишката и стигащи до края на вашата таблица.
Ако не знаете как да вмъквате макроси, не се колебайте да погледнете как да вмъквате и изпълнявате VBA код в Excel.
Sub RemoveRowsWithSelectedCells() Dim rngCurCell, rng2Delete As Range Application.ScreenUpdating = False Application.Calculation = xlCalculationManual For Each rngCurCell In Selection If Not rng2Delete Is Nothing Then Set rng2Delete = Application.Union(rng2Delete, _ ActiveSheet.Cells(rngCurCell.Row, 1)) Else Set rng2Delete = rngCurCell End If Next rngCurCell If Not rng2Delete Is Nothing Thenrng2Delete.EntireRow.Delete End If Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub Sub RemoveEveryOtherRow() Dim rowNo, rowStart, rowFinish, rowStep As Long Dim rng2Delete As Range rowStep = 2 rowStart = Application.Selection.Cells(1, 1).Row rowFinish = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row Application.ScreenUpdating = FalseApplication.Calculation = xlCalculationManual For rowNo = rowStart To rowFinish Step rowStep If Not rng2Delete Is Nothing Then Set rng2Delete = Application.Union(rng2Delete, _ ActiveSheet.Cells(rowNo, 1)) Else Set rng2Delete = ActiveSheet.Cells(rowNo, 1) End If Next If Not rng2Delete Is Nothing Then rng2Delete.EntireRow.Delete ' Hide every other row 'rng2Delete.EntireRow.Hidden = True End IfApplication.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End SubСъвет. Ако задачата ви е да оцветите всеки втори/трети и т.н. ред с различен цвят, ще намерите стъпките в "Редуване на цвят на редове и колони в Excel (лентови редове и колони)".
В тази статия описах как да изтриете редове в Excel. Сега имате няколко полезни макроса VBA за изтриване на избраните редове, знаете как да премахнете всеки друг ред и как да използвате Find & Replace, за да ви помогне да търсите и изберете всички редове със същите стойности, преди да ги премахнете. Надявам се, че горните съвети ще опростят работата ви в Excel и ще ви позволят да получите повече свободно време, за да се насладите на тези последнилетни дни. Бъдете щастливи и постигайте успехи в Excel!