Преглед садржаја
Избришите празне редове
Очигледан начин уклањања празних редова из скупа података је једноставно сортирање података. Ово помера празне редове на дно података и „уклања их“. Али шта ако желите да се празни редови уклоне, али не желите да се подаци сортирају? ВБА.
Следећи макро ће уклонити празне редове без икаквог сортирања (искључите ажурирање екрана да бисте брже прошли).
Суб ДелетеБланкРовс () Дим к Ас Лонг Витх АцтивеСхеет Фор к = .Целлс.СпециалЦеллс (клЦеллТипеЛастЦелл) .Ров То 1 Степ -1 Иф ВорксхеетФунцтион.ЦоунтА (.Ровс (к)) = 0 Затим АцтивеСхеет.Ровс (к). Иф Нект Енд Витх Енд Суб
