Аутоматски означите и пребројте искоришћени опсег ћелија Екцел са ВБА

Макро "УседРанге" вам је потребан за означавање или пребројавање свих ћелија које се користе у табели помоћу макроа. Користећи два примера, показаћемо вам како ово правилно користити.

Ако желите да обрађујете ћелије у табелама помоћу макроа, требало би да се ограничите на ћелије које заиста садрже садржај. Ово је лакше и много брже од претраживања свих ћелија у свим колонама и редовима. Екцел вам у ту сврху нуди имовину УседРанге ат. Односи се на све коришћене ћелије табеле и испоручује а Домет-Објект.

Користите УседРанге за означавање коришћених Екцел ћелија

Следећи макро приказује како се својство користи у пракси:

Суб МаркАллУседЦеллс ()
АцтивеСхеет.УседРанге.Селецт
Енд Суб

Следећа слика приказује како може изгледати када се макро користи у табели. Све коришћене ћелије су означене:

Макро увек означава ћелије у активној табели. Ако желите да користите другу табелу, замените објекат АцтивеСхеет позивањем на одговарајућу табелу.

Како бројати коришћене опсеге ћелија у Екцелу

Да бисте пребројали број ћелија у табели која садржи формулу, користите следећи макро:

Под формулеЦоунтинг ()

Дим Целл Ас Ранге Дим Цоунт као Доубле Цоунт = 0 За сваку ћелију у АцтивеСхеет.УседРанге. Ћелије Ако ћелија. ХасФормула Затим бројач = бројач + 1 следећа ћелија МсгБок ("У активној табели постоје ћелије" & Стр $ (Бројач) & "са формулама.")

Енд Суб

Макро поставља својство УседРанге.Целлс што омогућава упућивање на све ћелије које се користе у табели. Ако ћелија садржи формулу, променљива „Бројач“ се увећава за 1. Резултат се затим приказује у прозору поруке:

Ви ће помоћи развој сајта, дељење страницу са пријатељима

wave wave wave wave wave