Текст је функција радног листа у Екцелу, али се такође може користити у ВБА док се с њим користи својство ранге, функција за ову функцију је слична функцији радног листа и узима исти број аргумената који су вредности које треба да буду претворен и одређени формат броја.
Екцел ВБА текстуална функција
ТЕКСТ је функција доступна на радном листу, али нажалост, то није уграђена функција у програму Екцел ВБА. Да бисмо приступили овој функцији, морамо да користимо објект класе функције радног листа у ВБА. Функција текста у програму Екцел претвара вредност у назначени формат броја.
Један од проблема са овом функцијом као аргументима. Кад год користимо функцијску класу ВБА радног листа, не можемо видјети јасну синтаксу слично као у нашем радном листу. Само пише „Арг1“ и „Арг2“.
- Арг1 је вредност на коју треба да применимо форматирање.
- Арг2 је обликовање које треба да применимо и морамо да одредимо код за форматирање.
Примери ВБА функције текста у Екцелу
Испод су примери Екцел ВБА функције текста.
Пример # 1
Показаћу вам једноставан пример ТЕКСТА у ВБА Екцелу. Погледајте доњи код у Висуал Басиц-у.
Шифра:
Суб Тект_Екампле1 () Дим ФорматтингВалуе Ас Стринг Дим ФорматтингРесулт Ас Стринг ФорматтингВалуе = 0,564 ФорматтингРесулт = ВорксхеетФунцтион.Тект (ФорматтингВалуе, "хх: мм: сс АМ / ПМ") МсгБок ФорматтингРесулт Енд Суб
Прво сам прогласио две променљиве као низ у ВБА.
Дим ФорматтингВалуе Ас Стринг Дим ФорматтингВалуе Ас Стринг
За прву променљиву доделио сам број за форматирање, који морамо да форматирамо.
ФорматтингВалуе = 0.564
Сада сам за другу променљиву доделио функцију ТЕКСТ.
ФорматтингРесулт = ВорксхеетФунцтион.Тект (ФорматтингВалуе, "хх: мм: сс АМ / ПМ")
Ако приметите, применио сам обликовање времена, тј. „Хх: мм: сс АМ / ПМ“.
Тада сам коначно применио ВБА оквир за поруку да покажем резултат.
МсгБок ФорматтингРесулт
Када покренем функцију ТЕКСТ кода, примениће формат времена на број 0.564 и приказати резултат као испод.
Дакле, време имамо као „ 13:32:10 ПМ “.
Пример # 2
Слично примеру примера формата датума, и у овом примеру смо унели неке мање измене. Испод је шифра.
Шифра:
Суб Тект_Екампле2 () Дим ФорматтингВалуе Ас Стринг Дим ФорматтингРесулт Ас Стринг ФорматтингВалуе = 43585 ФорматтингРесулт = ВорксхеетФунцтион.Тект (ФорматтингВалуе, "ДД-МММ-ИИИИ") МсгБок ФорматтингРесулт Енд Суб
Из претходног кода променио сам вредност форматирања са 0,565 на 43585 и променио стил форматирања као „ДД-МММ-ГГГГ“.
Ово ће применити форматирање на број 43585 као датум, а резултат је следећи.
Примените форматирање на ћелије
Видели смо једноставне примере. Сада погледајте како се ради са ћелијама на радном листу. За овај пример погледајте податке у наставку.
За све ове бројеве морамо применити формат времена. Овај код ће применити обликовање.
Шифра:
Суб Тект_Екампле3 () Дим к као цео број за к = 1 до 10 ћелија (к, 2) .Валуе = Функција радног листа.Текст (Ћелије (к, 1) .Валуе, "хх: мм: сс АМ / ПМ") Следећи к Крај Суб
Овај код ће се петљати кроз 10 ћелија и применити доље обликовање.
Овако, користећи функцију ВБА ТЕКСТ, можемо применити форматирање бројева на ћелије.
