ВБА временска функција | Екамлпес за коришћење Екцел ВБА функције времена
Функција Екцел ВБА времена
ВБА времеФункција враћа тренутно време, такође је важно напоменути да ова функција нема никакве аргументе, још један важан фактор који треба запамтити је да ова функција враћа тренутно системско време. Коришћењем ове функције можемо заправо да утврдимо стварно време потребно реду линије за завршетак процеса.
ВРИЈЕМЕ је врста променљиве функције, она нема никакву синтаксу.
Такође имамо сличну функцију у екцелу - НОВ () функција која у прорачунску табелу убацује и тренутна времена и тренутни датум
ВРЕМЕ ()
Само треба да унесемо функцију, заправо, за уметање тренутног времена није потребно да се у заграде ставља само ВРЕМЕ. Резултат који даје функција ТИМЕ налази се у низу.
Како се користи функција ВРЕМЕНА у ВБА?
Показаћу вам пример једноставног ТИМЕ-а у екцел функцији. Следите кораке у наставку да бисте креирали код за употребу функције ТИМЕ.
Овај ВБА образац временске функције можете преузети овде - ВБА предложак временске функцијеКорак 1: Направите макро.
Шифра:
Суб Тиме_Екампле1 () Енд Суб
Корак 2: Прогласите променљиву као Стринг.
Шифра:
Суб Тиме_Екампле1 () Затамни ЦуррентТиме као Стринг Енд Суб
Корак 3: Доделите вредност овој променљивој кроз функцију ТИМЕ.
Шифра:
Суб Тиме_Екампле1 () Затамни ЦуррентТиме као низ ЦуррентТиме = Време Крај Суб
Корак 4: Сада прикажи резултат у оквиру за поруку.
Шифра:
Суб Тиме_Екампле1 () Затамни ЦуррентТиме као низ ЦуррентТиме = Тиме МсгБок ЦуррентТиме Енд Суб
Покрените овај код помоћу тастера Ф5 или ћемо ручно добити тренутно време.
Дакле, када покренем овај код, време је било 11.51.54 АМ.
Алтернатива функцији Нов ()
Комбинација датума и времена као алтернатива функцији САДА
Као што сам рекао на почетку чланка САДА може убацити тренутни датум и време. Међутим, две друге функције можемо користити као алтернативу функцији САДА, те две функције су ВБА ДАТЕ и ВБА ТИМЕ функције.
ВБА датум ће вратити тренутни датум, а време ће вратити тренутно време, тако да ово чини функцију САДА. Испод је скуп кода који ће уметнути тренутни датум и време у ћелију А1.
Шифра:
Суб Тиме_Екампле2 () Распон ("А1"). Валуе = Дате & "" & Тиме Енд Суб
Овај код ће уметнути тренутни датум и време у ћелију А1.
Такође можемо применити формат на ове вредности помоћу функције ФОРМАТ. Доле наведени код форматираће датум и време.
Шифра:
Суб Тиме_Екампле2 () Распон ("А1"). Вредност = Датум & "" & Временски опсег ("А1"). НумберФормат = "дд-ммм-ииии хх: мм: сс АМ / ПМ" Енд Суб
Резултат овог кода је следећи.
Пратите отворене записе своје радне свеске помоћу функције времена у ВБА
Често морамо знати како често радно време отворимо. Постоји ситуација када радну књижицу отварамо прилично често и уносимо неке промене. Пратећи време и датум отварања радне свеске можемо пратити време отварања радне свеске.
Направите нови лист и преименујте га у „Трацк Схеет“.
Корак 1: Двапут кликните на Ова радна свеска из ВБЕ Едитора.
Корак 2: Изаберите радну свеску са падајуће листе објеката.
Корак 3: Чим одаберете ову опцију, у називу ћете видети нови макро аутоматски створен сам од себе „Воркбоок_Опен ()“.
Корак 4: Унутар овог макроа мораћемо да напишемо код за праћење датума и времена отварања радне свеске.
Већ сам написао код, а доле је код за вас.
Шифра:
Привате Суб Воркбоок_Опен () Дим ЛР Ас Лонг ЛР = Схеетс ("Трацк Схеет"). Ћелије (Ровс.Цоунт, 1). Енд (клУп) .Ров + 1 Схеетс ("Трацк Схеет"). Ћелије (ЛР, 1) .Валуе = Датум & "" & Листови времена () ("Трацк Схеет"). Ћелије (ЛР, 1) .НумберФормат = "дд-ммм-ииии хх: мм: сс АМ / ПМ" Енд Суб
Ово ће забележити радно време ваше радне свеске попут доњег.