У овом чланку ћемо научити како издвојити запис без критеријума кроз ВБА у Мицрософт Екцелу.
Узмимо пример да бисмо разумели како можемо поставити филтер и изабрати критеријуме, а затим предузети потребне радње:-
Имамо податке у опсегу А: Г колоне, у којима колона А садржи име, колона б садржи адресу, колона Ц садржи град, регион колоне Д, колона Е држава, колона Ф телефонски број и колона Г садржи критеријуме.
Желимо да напишемо Макро да ставимо филтер, а затим филтрирамо податке према Не садржи податке у колони Г, а затим избришемо Не садржи податке. Затим уклоните филтер и покажите све податке.
Да бисте извукли запис са критеријумима Није, следите доле наведене кораке:
- Отворите ВБА страницу притисните тастер Алт+Ф11
- Уметните модул
- Затим идите на поново убацивање менија и кликните на процедуру, где ћете добити процедуру ако не знате како би требало покренути макро
- Напишите доле наведени код:
Суб Делете_НотЕлигибле () АцтивеСхеет.Ранге ("$ А $ 1: $ Г $ 15"). Поље аутоматског филтрирања: = 7, Цритериа1: = "" Редови ("2:12"). Изаберите Селецтион.Делете Схифт: = клУп Ранге (" Б1 "). Одаберите Селецтион.АутоФилтер Енд Суб
- За покретање кода притисните тастер Ф5 на тастатури.
- Подаци ће бити филтрирани, а затим ће се према постављеним критеријумима филтрирани подаци избрисати.
Објашњење кода:
- Дефинирали смо опсег заглавља података да бисмо филтер са критеријумима празних ћелија унели у колону подобности
- Дефинишите у коду да изаберете ред, а затим ћете избрисати цео ред
- На крају отворите филтер
На овај начин можемо поставити филтер на основу одређених критеријума, а затим избрисати податке.
Ако вам се допадају наши блогови, поделите их са пријатељима на Фацебооку. Такође нас можете пратити на Твиттер -у и Фацебоок -у.
Волели бисмо да чујемо од вас, реците нам како можемо побољшати, допунити или иновирати наш рад и учинити га бољим за вас. Пишите нам на веб локацији е -поште