Желите да добијете број речи у Екцелу? Веровали или не, Екцел нема уграђен бројач речи.
Али не брините.
Слатка гомила екцел функција (или мало ВБА ако вам се свиђа) то лако може учинити за вас.
У овом водичу ћу показати неколико начина за бројање речи у Екцелу помоћу једноставних формула. И на крају ће такође обухватити технику за креирање прилагођене формуле користећи ВБА која ће вам брзо дати број речи било ког текста у било којој ћелији.
Формула за добијање броја речи у Екцелу
Пре него што вам дам тачну формулу, хајде да пређемо на логику да бисмо добили број речи.
Претпоставимо да имам реченицу као што је приказано испод за коју желим да добијем број речи.
Док Екцел не може да изброји број речи, може да изброји број размака у реченици.
Дакле, да бисмо добили број речи, можемо пребројати ове размаке уместо речи и додати 1 укупном броју (јер би број размака био један мањи од броја речи).
Сада могу постојати две могућности:
- Између сваке речи постоји један размак
- Између речи постоји више размака.
Па да видимо како да избројимо укупан број речи у сваком случају.
Пример 1 - Када постоји један размак између речи
Рецимо да имам следећи текст у ћелији А1: Пустите мачку из торбе
Да бих избројао број речи, ево формуле коју бих употребио:
= ЛЕН (А1) -ЛЕН (ЗАМЕНА (А1, "", ""))+1
Ово би вратило „7“ као резултат.
Ево како ова формула функционише:
- ЛЕН (А1) - Овај део формуле враћа 26, што је укупан број знакова у тексту у ћелији А1. Укључује текстуалне знакове, као и размаке.
- ЗАМЈЕНА (А1, ”“, ””) - Овај дио формуле уклања све размаке из текста. Дакле, резултат би у овом случају био Избрбљати тајну.
- ЛЕН (ЗАМЕНА (А1, ”“,“”) - Овај део формуле броји укупан број знакова у тексту који нема размака. Дакле, резултат овога би био 20.
- ЛЕН (А1) -ЛЕН (ЗАМЕНА (А1, ”“,“”)) - Ово би одузело дужину текста без размака од дужине текста са размацима. У горњем примеру, то би било 26-20 што је 6.
- = ЛЕН (А1) -ЛЕН (ЗАМЕНА (А1, ”“,“”))+1 - Укупном резултату додајемо 1 јер је укупан број размака за један мањи од укупног броја речи. На пример, постоји један размак у две речи и два размака у три речи.
Ово добро функционише ако имате само један размак између речи. Али не би успело ако имате више размака између речи.
У том случају користите формулу у следећем примеру.
Пример 2: Када постоји више размака између речи
Рецимо да имате следећи текст: Пустите мачку из торбе
У овом случају постоји више размака између речи.
Да бисмо добили број речи, прво морамо уклонити све додатне размаке (тако да између две речи постоји само један знак размака), а затим пребројати укупан број размака.
Ево формуле која ће нам дати прави број речи:
= ЛЕН (ТРИМ (А1))-ЛЕН (ЗАМЕНА (А1, "", ""))+1
Ово је слична формула која се користи у горњем примеру, са незнатном променом - овде смо такође користили функцију ТРИМ.
Екцел ТРИМ функција уклања све водеће, завршне и додатне размаке (осим појединачних размака између речи).
Остатак формуле ради исто (као што је објашњено у примеру 1).
Напомена: Ако нема размака између речи, сматра се једном речју.
Коришћење ВБА прилагођене функције за бројање речи у Екцелу
Иако горње формуле одлично функционишу, ако имате потребу да често рачунате број речи, можете користити ВБА за креирање прилагођене функције (која се такође назива кориснички дефинисана функција).
Предност коришћења прилагођене функције је у томе што је можете креирати једном, а затим користити као било коју другу редовну Екцел функцију. Дакле, уместо да креирате дугачку сложену формулу као што смо то учинили у претходна два примера, имате једноставну формулу која узима референцу ћелије и тренутно вам даје број речи.
Ево кода који ће креирати ову прилагођену функцију за добијање броја речи у Екцелу.
Функција ВордЦоунт (ЦеллРеф као опсег) Дим ТектСтрнг Ас Стринг Дим Ресулт () Ас Стринг Ресулт = Сплит (ВорксхеетФунцтион.Трим (ЦеллРеф.Тект), "") ВордЦоунт = УБоунд (Ресулт ()) + 1 Енд Фунцтион
Након што креирате, можете користити функцију ВордЦоунт као и било коју другу редовну Екцел функцију.
У горњем коду за прилагођену функцију користио сам функцију ТРИМ радног листа да уклоним све водеће, задње и двоструке размаке између речи. Ово осигурава да све три ћелије дају исти резултат, јер се броје само речи, а не и дупли размаци.
Како функционише ова формула:
Горњи ВБА код прво користи функцију ТРИМ за уклањање свих почетних, задњих и двоструких размака из текстуалног низа у референцираној ћелији.
Једном када има очишћен низ, користи функцију СПЛИТ у ВБА за раздвајање текстуалног низа на основу граничника, за који смо навели да је знак размака. Дакле, свака реч је одвојена као ускладиштена као засебна ставка у променљивој Резултат.
Затим користимо функцију УБОУНД за пребројавање укупног броја ставки ускладиштених у променљивим резултатима. Пошто ВБА има базу 0, морамо додати 1 да бисмо добили укупан број речи.
То значи да Ресулт (0) складишти прву реч, Ресулт (1) другу реч итд. Пошто ово бројање почиње од 0, морамо додати 1 да бисмо добили прави број речи.
Где ставити овај код?
Када креирате прилагођену функцију, морате да унесете код у ВБ Едитор радне свеске (који се налази на задњој страни радне свеске где можете писати код за аутоматизацију задатака и креирање прилагођених функција).
Испод су кораци за унос кода за функцију „ГетНумериц“ у радну свеску.
- Идите на картицу Девелопер.
- Кликните на опцију Висуал Басиц. Ово ће отворити ВБ едитор у позадини.
- У окну Пројецт Екплорер у ВБ Едитор-у кликните десним тастером миша на било који објекат радне свеске у који желите да уметнете код. Ако не видите Пројецт Екплорер, идите на картицу Виев и кликните на Пројецт Екплорер.
- Идите на Уметни и кликните на Модул. Ово ће уметнути објект модула за вашу радну свеску.
- Копирајте и залепите код у прозор модула.
Након што сте копирали код у кодни прозор, можете се вратити на радни лист и користити ову функцију као и било коју другу уобичајену Екцел функцију.
Само откуцај = Реч и приказаће вам формулу на листи.
Потребан је један аргумент, који је референца ћелије и тренутно вам даје број речи у њему.
