В тази статия ще научим как да извличаме запис без критерии чрез VBA в Microsoft Excel.
Нека вземем пример, за да разберем как можем да поставим филтъра и да изберем критериите и след това да предприемем необходимите действия:-
Имаме данни в диапазон A: G колони, в които колона A съдържа Име, колона b съдържа Адрес, колона C съдържа град, колона D регион, колона E държава, колона F телефонен номер и колона G съдържа критерии.
Искаме да напишем макроса, за да поставим филтъра и след това да филтрираме данните според Не съдържа данни в колона G и след това да изтрием Не съдържа данни. И след това премахнете филтъра и покажете всички данни.
За да извлечете запис с Не критерии, следвайте следните стъпки:
- Отворете VBA страница, натиснете клавиша Alt+F11
- Поставете модул
- След това отидете отново в менюто за вмъкване и кликнете върху процедура, където ще получите процедурата, ако не знаете как трябва да стартирате макроса
- Напишете кода по -долу:
Sub Delete_NotEligible () ActiveSheet.Range ("$ A $ 1: $ G $ 15"). Поле за автоматично филтриране: = 7, Criteria1: = "" Редове ("2:12"). Изберете Selection.Delete Shift: = xlUp Range (" B1 "). Изберете Selection.AutoFilter End Sub
- За да стартирате кода, натиснете клавиша F5 на клавиатурата.
- Данните ще бъдат филтрирани и след това според зададените критерии филтрираните данни ще бъдат изтрити.
Код Обяснение:
- Определихме диапазона от заглавки с данни, за да поставим филтъра с критерии за непразни клетки в колоната за допустимост
- Определете в кода, за да изберете реда и след това ще изтриете целия ред
- В края отворете филтъра
По този начин можем да поставим филтъра въз основа на определени критерии и след това да изтрием данните.
Ако ви харесаха нашите блогове, споделете го с приятелите си във Facebook. Можете също така да ни следвате в Twitter и Facebook.
Ще се радваме да чуем от вас, уведомете ни как можем да подобрим, допълним или обновим работата си и да я подобрим. Пишете ни на имейл сайта