VBA Видалити рядок - Як видалити рядок у Excel VBA?

• VBA Видалити рядок

VBA Видалити рядок

У Excel для видалення будь-якого рядка у нас є ярлик використання CTRL + - або ми можемо вибрати рядок і клацнути правою кнопкою миші та видалити його. Але у VBA ми це зробили, написавши для цього код. Спосіб видалення рядка в VBA спочатку нам потрібно визначити, який рядок видалити, а потім ми можемо його видалити. У цій статті ми дізнаємось про різні ілюстрації про те, як видалити рядок у VBA.

У VBA, рядок "Видалити" використовується для видалення набору рядків або одного рядка залежно від ситуації. Подібно до робочого листа excel, ми можемо використовувати макроси або VBA для видалення рядків на робочому аркуші excel. Це допомагає, коли у нас багато даних, і ми не можемо це зробити вручну.

Синтаксис для видалення рядка в Excel VBA

Синтаксис для видалення рядка в excel є наведеним нижче.

Робочі таблиці.Руки (рядок №). Видалити

Існують також інші методи видалення рядків за допомогою VBA, такі, як описано нижче.

Діапазон ("Стільник"). EntireRow.Delete

Що згадане вище твердження буде робити, це видалить рядок для даного рядка. Наприклад, якщо ми запишемо діапазон ("A1"). EntireRow.Delete, тоді перший рядок буде видалено, оскільки комірка A1 належить до першого ряду.

Також ми можемо використовувати рядки (row_num) .delete для видалення рядка.

Як видалити рядок в Excel за допомогою VBA?

Нижче наведено кілька прикладів того, як видалити рядок у excel за допомогою VBA.

Ви можете завантажити цей шаблон видалення рядка Excel VBA тут - VBA Видалити шаблон рядка Excel

Рядок видалення VBA - приклад №1

Дозвольте використовувати перший простий метод для видалення рядків. З метою демонстрації я введу випадкове значення в комірки A1 і B1. Подивіться на це нижче.

Що я хочу побачити, якщо я використовую код, написаний над усім рядком, буде видалений або буде видалена одна комірка.

Примітка. Для використання Excel VBA увімкнено вкладку розробника на вкладці Файли в розділі параметрів.

Виконайте наведені нижче дії, щоб видалити рядок у excel за допомогою VBA.

Крок 1: Перейдіть на вкладку розробника, натисніть на Visual Basic, щоб відкрити редактор VBA.

Крок 2: У сегменті коду оголосіть підфункцію, щоб почати писати код.

Код:

 Sub Sample () Кінець Sub 

Крок 3. Тепер напишіть наступний код, щоб видалити рядок.

Код:

 Діапазон додаткового зразка () ("A1"). EntireRow.Delete End Sub 

Крок 4: Запустіть цей код, натиснувши кнопку F5 або Запустити і подивіться вихід.

Після запуску коду ми бачимо, що значення обох комірок A1 і B1 видаляються, коли весь перший рядок був видалений.

Рядок видалення VBA - приклад №2

Раніше в першому прикладі я видалив лише один рядок. Але що робити, якщо нам доведеться видалити кілька рядків. Для демонстрації я маю такі дані, як показано нижче,

Я хочу видалити всі перші п’ять рядків. Виконайте нижче кроки, щоб видалити рядок у excel за допомогою VBA.

Крок 1. На вкладці розробника натисніть на Visual Basic, щоб відкрити редактор VBA.

Крок 2. У коді оголосіть підфункцію, щоб почати писати код,

Код:

 Sub Sample1 () Кінець Sub 

Крок 3: Напишіть наведений нижче код, щоб видалити цілих п'ять рядків.

Код:

 Діапазон Sub Sample1 () ("A1: B5"). EntireRow.Delete End Sub 

Крок 4: Запустіть цей код, натиснувши кнопку F5 або Запустити і подивіться вихід.

Після запуску коду ми бачимо наступний результат: Усі дані були видалені означає, що перші п'ять рядків були видалені, як ми мали дані в перших п'яти рядках.

Примітка: я вставлю назад дані в зразок листа excel для демонстрації.

Рядок видалення VBA - приклад №3

Зараз у нас є дані про співробітників, і їх продаж здійснюється за три місяці січень, лютий та березень. Один із працівників був у відпустці і не міг займатися продажами три місяці, тому клітини для нього порожні. Наша мета - знайти цей порожній рядок і видалити його з даних.

Подивіться на дані нижче,

Виконайте нижче кроки, щоб видалити рядок у excel за допомогою VBA.

Крок 1. На вкладці розробника натисніть на Visual Basic, щоб відкрити візуальний базовий редактор.

Крок 2. Оголосіть підфункцію у вікні коду, щоб почати писати код,

Код:

 Sub Sample2 () Кінець Sub 

Крок 3: Напишіть наступний код, щоб видалити рядки, у яких є порожні комірки.

Код:

 Діапазон Sub Sample2 () ("A1: D5"). SpecialCells (xlCellTypeBlanks) .EntireRow.Delete End Sub 

SpecialCells - це функція в VBA, яка повертає нам усі клітини, які відповідають нашим умовам, і наш стан був порожніми клітинками в цьому діапазоні, тому ми використовували функцію xlCellTypeBlanks.

Крок 4: Запустіть цей код, натиснувши кнопку F5 або Запустити і подивіться вихід.

Після запуску коду ми бачимо, що рядок із порожніми клітинками видалено.

Примітка: я знову вставлю назад дані в зразок листа excel для демонстрації.

Рядок видалення VBA - приклад №4

Існують деякі інші подібні методи видалення рядків, такі як використання рядків та функції видалення. Наприклад, у нас є дані в рядку 4, і я хочу видалити рядок 4. Ми можемо дати команду excel для видалення 4- ^го рядка в даних. Подивіться на скріншот нижче У мене є випадкові дані у рядку 4 у першій комірці.

Виконайте нижче кроки, щоб видалити рядок у excel за допомогою VBA.

Крок 1. Відкрийте редактор VBA, натиснувши на Visual Basic на вкладці розробника,

Крок 2. Оголосіть підфункцію, щоб почати писати код.

Код:

 Sub Sample3 () Кінець Sub 

Крок 3: Введіть наступний код для видалення 4-го рядка.

Код:

 Sub Sample3 () Рядки (4) .Delete End Sub 

Крок 4: Запустіть цей код, натиснувши кнопку F5 або Запустити і подивіться вихід.

Дані видалено, оскільки 4- ^й рядок був видалений сам.

Рядок видалення VBA - приклад №5

У наведеному вище коді ми вказали діапазон або рядок, який потрібно видалити в самому коді. Тепер давайте введемо дані від користувача, і він може видалити рядок із заданих даних. Наприклад, у мене є дані про співробітників, і продажі зробили так, як показано нижче, і я хочу, щоб користувач вибирав діапазон із того, скільки даних користувач хоче видалити рядки з порожніми клітинками. Подивіться на наведені нижче дані,

Виконайте нижче кроки, щоб видалити рядок у excel за допомогою VBA.

Крок 1. Відкрийте редактор VB, натиснувши Visual Basic на вкладці розробника,

Крок 2: Визначте підфункцію, щоб почати писати код.

Код:

 Sub Sample4 () Кінець Sub 

Крок 2: Оголосіть дві змінні як діапазон, A і B.

Код:

 Sub Sample4 () Dim A як діапазон Dim B як діапазон Кінець Sub 

Крок 3: Для отримання даних від користувача для вибору діапазону для видалення ми будемо використовувати функцію вікна введення, і ми збережемо цей вхід у змінній, визначеній вище.

Код:

 Sub Sample4 () Dim A As Range Dim B As Range Set A = Application.InputBox ("Вибір даних", "Sample Macro", Type: = 8) End Sub 

Крок 4: Встановіть B = A, щоб вхід від користувача міг зберігатися в діапазоні B.

Код:

 Sub Sample4 () Dim A As Range Dim B As Range Set A = Application.InputBox ("Вибір даних", "Sample Macro", Тип: = 8) Встановити B = A End Sub 

Крок 5: Тепер ми видалимо дані, які містять порожні комірки, з діапазону, обраного користувачем.

Код:

 Sub Sample4 () Dim A As Range Dim B As Range Set A = Application.InputBox ("Вибір даних", "Sample Macro", тип: = 8) Встановити B = A A.SpecialCells (xlCellTypeBlanks) .EntireRow.Delete End Sub 

Крок 6: Тепер запустіть код із наданої кнопки запуску.

Крок 6: З'являється вікно введення.

Крок 7: Виберіть діапазон від A1: D8 у цьому прикладі. Натисніть ОК, щоб побачити результат.

Дані, які мали порожні комірки, видалено.

Що потрібно пам’ятати

Є кілька речей, які нам слід пам’ятати про Видалення рядка в Excel VBA:

• Рядок можна видалити на основі однієї комірки.
• Ми можемо видалити кілька рядків, надавши діапазон комірок.
• Ми також можемо видалити рядки, взявши дані користувача.

Рекомендовані статті

Це керівництво щодо видалення рядка видалення VBA. Тут ми обговорили, як видалити рядок у Excel VBA разом із практичними прикладами та шаблоном Excel, який можна завантажити. Ви також можете ознайомитися з іншими запропонованими нами статтями -

1. Як використовувати функцію заміни в VBA?
2. Ярлик для видалення рядків у Excel
3. Справа VBA | Прийоми Excel
4. Ярлик ярлика Excel Insert Row
5. Як підсумовувати кілька рядків у Excel?