Временска вредност у ВБА је уграђена функција која је такође категорисана под функцију датума и времена у ВБА, ова функција, као што назив сугерише, даје нам нумеричку вредност датума наведеног као аргумент, узима један аргумент који је датум и враћа нумеричку вредност из аргумента.
Шта функција Вредност вредности ради у ВБА?
Функција вредности времена у ВБА Екцел враћа део вредности времена из пуног датума и времена. Датум и време се у Екцелу чувају као серијски бројеви. Серијски број представља ДАТУМ, а децимални време. Помоћу функције ТимеВалуе можемо добити само временски серијски број, односно децимални број.
Синтакса функције ВБА ТимеВалуе
Синтакса функције ВБА ТимеВалуе је следећа.
Као што смо рекли, функција ТимеВалуе враћа део серијског броја датог датума, који се чува као текстуална вредност. Време није ништа друго до стварно време када желимо да добијемо серијски број. Запамтите, Временска вредност може добити серијски број само из времена које се чува као текст, а не као ВРЕМЕ.
Примери функције ТимеВалуе са Екцел ВБА
Испод су примери функције ВБА ТимеВалуе.
Пример ВБА временске вредности # 1
Сада погледајте једноставни пример функције ВБА ТимеВалуе.
Шифра:
Суб ТИМЕВАЛУЕ_Фунцтион_Екампле1 () 'Претвори задати улазни низ у важеће време и на екрану прикажи' Декларација променљиве Дим МиТиме Ас Дате 'Доделите време променљивој МиТиме = ТимеВалуе ("28-05-2019 16:50:45")' Приказати излаз на екрану МсгБок "Тренутно време је:" & МиТиме, вбИнформатион, "ВБА ТИМЕВАЛУЕ функција" Крај Суб
Прво, променљиву „МиТиме“ прогласио сам датумом .
Затамни МиТиме као датум
Тада сам променљивој доделио вредност применом ТимеВалуе.
МиТиме = ТимеВалуе ("28-05-2019 16:50:45")
Тада сам у оквиру за поруке доделио променљиву резултат.
МсгБок "Наведено време је:" & МиТиме, вбИнформатион, "ТИМЕВАЛУЕ функција".
Ако код покренем помоћу тастера Ф5 или ручно, резултат ћемо добити на следећи начин.
Пример ВБА временске вредности # 2
За исти код, прогласићу ВБА променљиву као „Доубле“.
Шифра:
Суб ТИМЕВАЛУЕ_Фунцтион_Екампле1 () 'Претварање датог улазног низа у важеће време и приказ на екрану' Декларација променљиве Дим МиТиме Ас Доубле 'Додељивање времена променљивој МиТиме = ТимеВалуе ("28-05-2019 16:50:45")' Приказати излаз на екрану МсгБок "Цуррент Тиме ис:" & МиТиме, вбИнформатион, "ВБА ТИМЕВАЛУЕ Фунцтион" Енд Суб
Сада, ако ручно покренем ВБА код или притиском на тастер Ф5, он ће приказати серијски број дела времена 16:50:45.
Ради вашег бољег разумевања, прво ћу унети бројеве дате у оквиру ВБА поруке у једну од ћелија.
Сада ћу применити временски формат да бих проверио тачан резултат.
Када га претворите у формат времена, можете видети тачно време.
Пример ВБА временске вредности # 3
Сада погледајте податке у наставку.
Имамо податке и време заједно од А1 до А14 ћелија. За другу колону треба да издвојимо само временску вредност. Будући да имамо више од једне ћелије са којом морамо да се бавимо, морамо да користимо петље да бисмо извршили исти скуп задатака за све ћелије.
Имамо податке из 1. ст ћелије до 14 -ог ћелије, тако да је наш петља би требало да ради за 14 пута. Морамо да користимо ФОР НЕКСТ петљу у ВБА да бисмо поменули доњу и горњу границу. Испод кода је већ написан код за издвајање вредности времена из комбинације датума и времена.
Шифра:
Суб ТимеВалуе_Екампле3 () Дим к као цео број за к = 1 до 14 ћелија (к, 2) .Валуе = ТимеВалуе (ћелије (к, 1) .Валуе) Следећи к Крај Суб
Када покренемо код, добићемо вредности као доле.
Ако желите да видите време, примените ТИМЕ формат на њега.
Дакле, овако функционише функција ВРЕМЕНСКА ВРЕДНОСТ у ВБА и Екцел-у.
