Садржај
Понекад морамо знати број редова који се користе у Екцел табели тако да можемо креирати формулу или макар ВБА. Срећом, постоје неки прилично једноставни начини за то и Екцел ВБА је само један од њих.Најједноставнији начин да сазнате ову информацију је да одете на дно вашег радног листа и погледате број десно од последње тачке података; међутим, са ВБА, овај израчун је изузетно једноставан.
Упутства
Уз ВБА, изузетно је једноставно израчунати број редова у Екцеловом радном листу (БананаСтоцк / БананаСтоцк / Гетти Имагес)-
Отворите Екцелов радни лист и ВБА едитор притиском на "Алт + Ф11".
-
Започните нову датотеку ВБА пројекта тако што ћете кликнути десним кликом на радну свеску, приказану у менију на десној страни, и изабрати "Ново".
-
Покрените нову функцију тако што ћете откуцати "Суб ЦоунтРовс ()". Ово говори ВБА компајлеру да постоји нови потпрограм за пројектну датотеку. Ако желите да преименујете потпрограм, промените текст "ЦоунтРовс" у било које жељено име, које мора бити праћено заградама приказаним изнад, на пример "ИоурНаме ()".
-
Направите варијаблу са текстом "Дим Цоунт ас Лонг" у следећем реду.
-
Унесите следећи код:
Цоунт = 0 Цоунт = Цоунт + 1 АцтивеЦелл.Оффсет (1, 0) .Одаберите Лооп до ИсЕмпти (АцтивеЦелл.Оффсет (0, 1))
Ово информише програм компајлера да је неопходно парсирати променљиву Цоунт и онда бројати редове целог радног листа. Код додаје варијаблу у Тотал Цоунт, а затим прелази у следећу ћелију све док је празна. Када стигне до празне ћелије, извршење се зауставља.
-
Активирајте текстуални оквир додавањем новог реда са текстом "МсгБок Цоунт". Ово ће приказати искачући оквир који ће вам рећи укупан број редова. Да би кутија била мало кориснија, можете унијети било који додатни текст. Преименуј линију у:
МсгБок "Постоји" [цоунт нумбер] "линије"
Можете променити текст у наводницима.
-
На крају, укуцајте "Енд Суб" у новој линији да бисте изашли из функције потпрограма.
Заказивање макроа
-
Вратите се на Екцел радни лист и сачувајте га.
-
Означите ћелију прве колоне која садржи највећи број података. Ова колона не треба да садржи празне ћелије од врха до дна.
-
Отворите мени "Тоолс" и изаберите "Мацрос" да бисте приказали оквир за дијалог који садржи све макрое програмиране за радни лист.
-
Изаберите макро креиран у одељку 1, са именом "ЦоунтРовс" или било којим другим именом које сте му дали, и кликните на "Рун". Када се заврши, макро ће приказати искачући текстуални оквир који ће вам рећи број испуњених редова
Покретање макроа
Како
- Ако само требате добити број, лакша и једноставнија алтернатива је бројање редова помоћу формуле. У празној ћелији, упишите "= ЦОУНТ (А: А, ИФ (А> 0,1,0))", где је А колона чији се број редова броји.