Већ смо размотрили шта су променљиве, типови података и константе у нашем ВБА водичу Типови података - Променљиве и константе. У овом водичу ћемо покрити како прогласити променљиву као датум.
У ВБА, тип података датума се складишти као децимални број. У овај тип података могу се сачувати и датуми и време. Тип података о датуму ВБА може да складишти вредности у распону од 1. јануара 100. до 31. децембра 9999. године.
ВБА променљива датума
Променљиву декларишете као датум помоћу кључне речи Дим:
1 | Дим датеОне као Дате |
Тада променљивој датума можете доделити датум. Постоји више начина за генерисање датума за додељивање променљивим:
Додели данас променљивој
Функција датума ће вратити данашњи датум:
123 | Дим дтТодаидтТодаи = Датум |
Додели сада променљивој
Функција Сада ће вратити данашњи датум и тренутно време:
123 | Дим дНовдНов = Сада |
Додели време променљивој
Временска функција ће вратити тренутно време:
123 | Дим тТиметТиме = Време |
Доделите датум променљивој помоћу ДатеСериал
Функција ДатеСериал ће вратити датум на основу унесене године, месеца и дана:
123 | Дим дсДатедсДате = ДатеСериал (2010, 11, 11) |
Доделите време променљивој помоћу ТимеСериал -а
Функција ТимеСериал ће вратити време, на основу улазних сати, минута и секунди:
123 | Дим тсТиметсТиме = ТимеСериал (10, 10, 45) |
Морате приложити датуме са # или ”када их користите у свом коду, као што је приказано испод:
ВБА ДатеВалуе функција
ВБА ДатеВалуе функција може се користити за иницијализацију датума. Следећи код се може користити за иницијализацију датума у ВБА:
1 | МсгБок ДатеВалуе ("1/1/2010") |
ВБА функција временске вредности
1 | МсгБок ТимеВалуе ("21:30:57") |
Пример променљиве датума Екцел ВБА
Ова процедура показује како се креирају променљиве датума, додељују им вредности и исписује их у Екцел радни лист:
12345678910111213 | Поддекларисање АВариаблеАсАДате ()Дим датеОне Ас ДатеДим датеТво Ас ДатедатеОне = #1/1/2019 #датеТво = "1/2/2019"Опсег („А1“). Вредност = датум једанОпсег ("А2"). Вредност = датумДваЕнд Суб |
Резултат је:
У овом водичу можете сазнати више о функцијама датума.
ВБА променљива датума у приступу
Променљива датума ради потпуно исто у Аццесс ВБА као и у Екцел ВБА.
Ова процедура показује како се креира променљива датума и ажурира поље у приступној табели са вредношћу.
12345 | Поддекларисање АВариаблеАсАДате ()Дим дтВорк Ас ДатедтВорк = #10/10/2020 #ДоЦмд.РунСкл "УПДАТЕ тблЈобс СЕТ ВоркДате = #" & дтВорк & " # ВХЕРЕ ЈобНо = 6"Енд Суб |