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