Съдържание
Тази статия ще ви покаже как можете да изтриете празни колони в Excel по три ефективни и лесни начина.
Изтегляне на работна тетрадка
Можете да изтеглите работната тетрадка за упражнения от тук.
Изтриване на празни колони в Excel.xlsm3 прости начина за изтриване на празни колони в Excel
Тук ще научите 3 начина за изтриване на празни колони в Excel чрез използване на инструменти за редактиране на Excel, чрез използване на формула и чрез прилагане на код VBA.
1. Чрез използване на инструментите за редактиране на Excel
Стъпка 1: Изберете набора от данни.
Стъпка 2: Отидете на Начало -> Намиране & Избор -> Отидете на специален .
Стъпка 3: От Отидете на специален изскачащия прозорец, изберете Заготовки , след което щракнете върху OK .
Стъпка 4: Ще бъдат избрани само празните клетки от набора ви от данни. Щракнете с десния бутон на мишката, от изскачащия списък с опции изберете Изтриване на .
Стъпка 5: След това от изскачащия прозорец Изтриване на кутия, изберете Преместване на клетките наляво от опциите. Щракнете върху ДОБРЕ.
Това ще изтрие всички празни колони от набора от данни.
Прочетете повече: Как да изтриете неизползваните колони в Excel
2. Чрез използване на формула
Можете да използвате COUNTA() формула за изтриване на празни колони в Excel. COUNTA() Формулата първо ще идентифицира празните и непразните колони в набора ви от данни в Excel и след това лесно ще можете да изберете и изтриете празните колони.
Това е друг ефективен начин за изтриване на празни колони в Excel, особено когато имате много празни колони за работа. Нека научим как да го направим.
Стъпка 1: Вмъкнете празен ред точно над набора от данни, като щракнете с десния бутон на мишката върху заглавието на първия ред и изберете Вмъкване на от изскачащия списък с опции. Това ще вмъкне нов ред над цялата съвкупност от данни.
Стъпка 2: В най-лявата клетка на работния лист запишете следната формула,
=COUNTA(A2:A1048576)=0
Тук,
A2 представлява първата клетка от набора от данни,
A1048576 представлява максималната стойност на реда в Excel (2007-2019).
Стъпка 3: Натиснете Въведете . Ще се покаже Истински ако колоната е празна, или Фалшив ако в цялата колона има поне една непразна клетка.
Стъпка 4: Приложете формулата към другите колони, като плъзнете Дръжка за пълнене .
Стъпка 5: Сега отидете в Начало -> Сортиране и филтриране -> Потребителско сортиране .
Стъпка 6: От изскачащия прозорец Сортиране щракнете върху прозореца Опции След това изберете Подредете отляво надясно от Опции за сортиране изскачащия прозорец и щракнете върху OK .
Стъпка 7: Щракнете върху падащото поле до Сортирай по етикет и оттам изберете опцията Ред 1 .
Стъпка 8: Щракнете върху падащото поле под Сортиране на етикет и изберете опцията Стойности на клетките оттам.
Стъпка 9: Щракнете върху падащото поле под Поръчка етикет и изберете опцията Най-голям към най-малък . кликнете OK .
Това ще премести всички празни колони в лявата част на работния лист.
Стъпка 10: Оттам просто изберете целия набор от данни с празни празни колони, щракнете с десния бутон на мишката и след това изберете Изтриване на .
Стъпка 11: От изскачащия прозорец Изтриване на изберете полето Цялата колона от опциите. Щракнете върху OK .
Това ще изтрие всички празни колони от набора от данни.
Подобни четива:
- Как да изтриете няколко колони в Excel
- Изтриване на дублиращи се колони в Excel (6 начина)
- Как да изтрием допълнителните колони в Excel (7 метода)
- Изтриване на колони в Excel, без да се засяга формулата (два начина)
3. чрез използване на код VBA
Ако сте опитен потребител на Excel, този метод е специално за вас. Прилагането на код VBA е най-сигурният начин за изтриване на празни колони в Excel. Той изтрива само абсолютно празните колони. Ако някоя колона съдържа стойност на една клетка, дори някоя клетка да връща празен низ, цялата колона ще остане напълно непокътната.
По-долу е описан автоматичният начин за изтриване на празни колони в Excel.
Стъпка 1: Натиснете Alt + F11 на клавиатурата или отидете в раздела Разработчик -> Visual Basic за да отворите редактора на Visual Basic.
Стъпка 2: В лентата с менюта щракнете върху Вмъкване на -> Модул .
Стъпка 3: Копирайте следния код и го поставете в прозореца за код.
Public Sub DeleteBlankColumns() Dim SrcRange As Range Dim EntrColumn As Range On Error Resume Next Set SrcRange = Application.InputBox( _ "Select a range:", "Delete Blank Columns", _ Application.Selection.Address, Type:=8) If Not (SrcRange Is Nothing) Then Application.ScreenUpdating = False For i = SrcRange.Columns.Count To 1 Step -1 Set EntrColumn = SrcRange.Cells(1, i).EntrColumn IfApplication.WorksheetFunction.CountA(EntrColumn) = 0 Then EntrColumn.Delete End If Next Application.ScreenUpdating = True End If End Sub Стъпка 4: Натиснете F5 на клавиатурата или от лентата с менюта изберете Изпълнявайте -> Изпълнение на Sub/UserForm Можете също така просто да кликнете върху малкия Икона за възпроизвеждане в лентата с подменюта, за да стартирате макроса.
Стъпка 5: От изскачащия диалогов прозорец преминете към интересуващия ви работен лист, изберете желания диапазон и щракнете върху OK .
Това ще изтрие всички празни колони от базата данни.
Заключение
В тази статия бяха разгледани три лесни начина за изтриване на празни колони в Excel. Показахме как да използваме инструментите за редактиране на Excel за изтриване на празни колони, показахме как да прилагаме формули за изтриване на празни колони и също така приложихме кода VBA за изтриване на празни колони в Excel.
