Овај водич ће показати како доћи до данашњег датума у ВБА.
Постоји неколико начина за добијање данашњег датума у ВБА коду, наиме коришћењем ВБА Датум () функцију или ВБА Сада() функције.
Функција Дате ()
Тхе Датум () функција нам омогућава да променљивој доделимо данашњи датум, а затим прикажемо датум у непосредном прозору у ВБЕ Едитор -у да бисмо видели данашњи датум.
| 123 | Дим дтТодаи ас ДатедтТодаи = Датум ()Дебуг.Принт дтТодаи |
Алтернативно, можемо приказати датум у оквиру за поруку.
| 12345 | Суб ТестДатеДим дтТодаи ас ДатедтТодаи = Датум ()Мсгбок "Данашњи датум је" & дтТодаиЕнд Суб |
Функција Нов ()
Тхе Сада() Функција ради на исти начин као функција датума, али укључује време.
| 12345 | Суб ТестДате ()Дим дтТодаи Ас ДатедтТодаи = Сада ()МсгБок "Данашњи датум је" & дтТодаиЕнд Суб |
Форматирање датума помоћу ВБА
У оба Датум () и Сада() функције, датум је форматиран у подразумеваном стилу како је одређено поставкама на нашем рачунару. Ово обликовање можемо прилагодити помоћу ВБА Формат функција. Како ће функција обликовања вратити низ, морамо декларисати а НИЗ променљива уместо а ДАТЕ променљива.
| 12345 | Суб ТестДате ()Дим дтТодаи Ас СтрингдтТодаи = Формат (Датум, "дд мммм ггггг")МсгБок "Данашњи датум је" & дтТодаиЕнд Суб |
Такође можемо да форматирамо Сада() функција за укључивање временског дела у прилагођени формат.
| 12345 | Под ФорматНов ()Дим дтТодаи Ас СтрингдтТодаи = Формат (Нов (), "дд мммм ии хх: мм: сс ам/пм")МсгБок дтТодаиЕнд Суб |
Упоређивање 2 датума са ВБА
Такође можемо користити функцију Датум да упоредимо данашњи датум са другим датумом - можда бисмо желели да израчунамо колико дана има до догађаја! То можемо учинити помоћу ВБА ДатеДифф () функција која ће вратити број. Стога можемо прогласитиИНТЕГЕР променљива за чување враћене вредности.
| 123456789 | Под ТестДатеДифф ()Дим дтТодаи Ас ДатеДим дтСомеДаи Ас ДатеДим иДаис Ас ИнтегердтТодаи = ДатумдтСомеДаи = "05/06/2021"иДаис = ДатеДифф ("д", дтТодаи, дтСомеДаи)МсгБок "Постоје" & иДаис & "дана између 2 датума"Енд Суб |
Како се датуми чувају као бројеви, могли бисмо да умањимо и други датум од првог да бисмо добили исти одговор.
| 1 | иДаис = дтТодаи - дтСомеДаи |
