Избришите редове са празним ћелијама у одређеној колони помоћу ВБА у Мицрософт Екцелу

Anonim

У овом чланку ћемо створити макро за брисање непотпуних записа који садрже празне ћелије.

Сирови подаци се састоје од неких узорака података, који укључују име, старост и пол. Такође садржи неке празне ћелије.

Желимо да уклонимо оне записе који садрже празне ћелије.

Логичко објашњење

Направили смо макро „БланкРовДелетион“ за брисање непотпуних записа. Претражује и бира празне ћелије, а затим брише цео ред који садржи празну ћелију.

Објашњење кода

Сет Рнг = Ранге ("А9: Ц" & ЛастРов)

Горњи код се користи за креирање објекта опсега за дате податке.

Рнг.СпециалЦеллс (клЦеллТипеБланкс) .Селецт

Горњи код се користи за избор празних ћелија унутар наведеног опсега.

Селецтион.ЕнтиреРов.Делете

Горњи код се користи за брисање целог реда за изабрану ћелију.

Молимо следите доле за код

 Опција Експлицитни Суб БланкРовДелетион () 'Декларисање променљивих Дим ЛастРов Ас Лонг Дим Рнг Ас Ранге' Добијање броја реда последње ћелије ЛастРов = Ранге ("А1"). СпециалЦеллс (клЦеллТипеЛастЦелл) .Ров 'Одабир свих података Рнг = Ранге ("А9 : Ц "& ЛастРов) 'Одабир празних ћелија Рнг.СпециалЦеллс (клЦеллТипеБланкс). Одаберите' Брисање потпуног одабира редова. ЕнтиреРов.Делете Ранге (" А9 "). Одаберите Енд Суб 

Ако вам се допао овај блог, поделите га са пријатељима на Фацебооку. Такође, можете нас пратити на Твиттер -у и Фацебоок -у.

Волели бисмо да чујемо од вас, јавите нам како можемо побољшати наш рад и учинити га бољим за вас. Пишите нам на веб локацији е -поште