Преглед садржаја
Једна од најважнијих и најчешће коришћених функција које користимо док радимо са ВБА у Екцел-у је Средња функција од ВБА . Узима стринг као улаз и враћа дати број знакова из средине стринга као излаз. Данас у овом чланку показаћу вам како можете да користите средњу функцију од ВБА са одговарајућим примерима и илустрацијама.
Ово ће вратити 9 знакова из низа „Ангела Цатхерине Невиллс” , почевши од 8тх знака. То је “Цатхерине” .
Преузмите свеску за вежбу
Преузмите ову вежбу да бисте вежбали задатак док читате овај чланак.
ВБА Мид Фунцтион.клсм
Увод у средњу функцију ВБА у Екцел-у
⧭ Циљ функције:
Функција Мид узима вредност као улаз и враћа дати број знакова почевши од дате позиције вредности као излаз.
Вредност може бити стринг, број или чак боолеан .
На пример, ако уметнете Мид(“Ангела Цатхерине Невиллс”,8,9), вратиће “Цатхерине” .
Ако уметнете Мид(12345,2,3) , добићете 234.
И убаците Мид(Фалсе,2,3) , добићете алс .
⧭ Синтакса:
Синтакса Мид функција од ВБА је:
=Mid(String,Start as Long,[Length]) ⧭ Аргументи:
| Аргумент | Обавезно / Опционо | Објашњење |
|---|---|---|
| Стринг | Обавезно | Стринг од којима ће бити враћен одређени број знакова. |
| Старт | Обавезно | Почетни знак стринга који ће бити враћен. |
| Дужина | Опционално | Број знакова који ће бити враћени. Подразумевано је 1. |
⧭ Повратна вредност:
Враћа дати број знакова из средине низа, почевши од дате позиције.
3 Примера средње функције ВБА у Екцел-у
Овај пут, хајде да истражимо Мид функцију од ВБА детаљно са неколико примера.
1. Одвајање датог броја знакова од средине неких ИД-ова коришћењем средње функције ВБА у Екцел-у
Овде имамо скуп података са ИД-овима и Имена неких запослених у компанији која се зове Сатурн Гроуп.
Овде, 4. до 7. карактера сваког ИД означава годину придруживања одговарајућег запосленог.
Сада ћемо развити кориснички дефинисану функцију користећи средњу функцију од ВБА који ће издвојити годину придруживања сваког запосленог из ИД-а запосленог .
Можете користити следећи ВБА код:
⧭ ВБА код:
7400
Напомена: Овај кодкреира функцију под називом Јоининг_Иеар .
⧭ Излаз:
Покрени ово функција у било којој ћелији вашег радног листа са ИД-ом као аргументом.
Овде, у ћелију Д4 , унели смо формулу:
=Joining_Year(B4) Вратио је годину придруживања првог запосленог, 2021 .
Сада можете превући Попуните Хандле да бисте добили године придруживања осталих запослених.
⧭ Објашњење кода:
- Прво, декларишемо функцију под називом Јоининг_Иеар која узима ИД као улаз линијом Фунцтион Јоининг_Иеар(ИД) .
- Онда издвајамо 4 карактера из ИД-а почевши од позиције 4 , линијом Јоининг_Иеар = Мид(ИД, 4, 4) .
- Линија Крај функције декларира крај функције.
2. Извлачење екстензија из неких адреса е-поште коришћењем средње функције ВБА у Екцел-у
Сада смо додали нову колону скупу података која садржи адресе е-поште запослених.
Овај пут ћемо издвојити екстензије адреса е-поште користећи Мид функцију ВБА .
ВБА код ће бити:
⧭ ВБА код:
7927
Напомена: Овај код креира функцију под називом Ектенсион .
⧭ Излаз:
Покрени ово функционишу у било којој ћелији вашег радног листа са Е-порукомАдреса као аргумент.
Овде, у ћелију Е4 , унели смо формулу:
=Extension(D4) Вратио је екстензију прве адресе е-поште.
Онда можете превући ручицу за попуњавање да извучете екстензије свих е-порука адресе.
⧭ Објашњење кода
- Прво, декларишемо функцију под називом Проширење које узима било које име као улаз у линији Проширење функције(Емаил_Аддресс) .
- Онда започињемо итерацију са фор-петљом који проверава сваки знак Адресе е-поште да види да ли је @ или не у реду Ако је Мид(Емаил_Аддресс, и, 1) = “@” Онда .
- Ако пронађе @ , онда издваја потребну екстензију из Адресе е-поште линијом Ектенсион = Мид(Емаил_Аддресс, и + 1, Лен(Адреса_е-поште) – (и + 4)) .
- Коначно, проглашавамо крај функције.
3. Провера неких текстова да бисте видели да ли садрже одређени текст или не
Једна од најважнијих употреба средње функције је да се види да ли текст садржи одређени текст или не .
Хајде да развијемо функцију да проверимо да ли Адресе е-поште садрже термин „гмаил” или не.
Можете користити следеће ВБА код:
⧭ ВБА код:
7975
Напомена: Овај код креира функцију зове Провера .
⧭ Излаз:
Покрени ову функцију у било којој ћелији вашег радног листа са два текста као аргументом.
Овде, у ћелију Е4 , унели смо формулу:
=Checking(D4,"gmail") Вратио је да јер је 1. адреса е-поште Гмаил адреса.
Онда можете превући Филл Хандле да урадите исто за све ИД-ове е-поште.
⧭ Објашњење кода:
- Прво, декларишемо функцију под називом Провера која узима два текста као аргументе линијом Провера функције(Тект1,Тект2) .
- Затим покрећемо фор петљу која проверава сваки сегмент Тект1 почевши од позиције 1 , да видимо да ли је једнак Тект2 или не , линијом Ако је средина(текст1, и, Лен(текст2)) = текст2, онда .
- Ако пронађе Тект2 , онда враћа “Да” , у супротном враћа “Не” .
- Коначно, закључујемо функцију линијом Завршна функција .
Ствари које треба запамтити
- Аргумент 1. Мид функције не мора увек бити стринг. То може бити стринг , број или чак боолеан вредност.
- Али 2нд и 3рд аргументи морају бити бројеви . Могу бити цели бројеви или разломци али морају бити бројеви . Ако су разломци , онда је Средњифункција ће их конвертовати у најближе целе бројеве .
