Время в формате VBA

В этом руководстве будет показано, как использовать функцию форматирования VBA для форматирования времени.

Функция форматирования и время

Время в формате VBA с предопределенными форматами

Функцию VBA Format можно использовать для преобразования числа в строку с предопределенным форматом. Доступные форматы для времени: долгое время, среднее время и короткое время.

1234567891011121314 Sub FormatTimeExample_1 ()Dim DateEx как датаDateEx = # 18.04.2020 18:05:07 #MsgBox Format (DateEx, "Long Time") 'Результат: 18:05:07 PMMsgBox Format (DateEx, "Среднее время") 'Результат: 18:05MsgBox Format (DateEx, "Short Time") 'Результат: 18:05DateEx = # 2/18/2021 6:05:07 #MsgBox Format (DateEx, "Long Time") 'Результат: 6:05:07 AMMsgBox Format (DateEx, "Среднее время") 'Результат: 06:05MsgBox Format (DateEx, "Short Time") 'Результат: 06:05Конец подписки

Время в формате VBA с настраиваемыми форматами

Функцию VBA Format можно использовать для преобразования числа в строку с настраиваемыми форматами. Символы h и hh используются для часов, n и nn для минут, s и ss для секунд, ttttt для полного времени в соответствии с настройками системы и AM / PM, am / pm, A / P, a / p, AMPM для утра. -pm система.

1234567891011121314151617 Sub FormatTimeExample_2 ()Dim DateEx как датаDateEx = # 18.04.2020 18:05:07 #MsgBox Format (DateEx, "hh: nn: ss") 'Результат: 18:05:07MsgBox Format (DateEx, "h: n: s AM / PM") 'Результат: 18:17:19MsgBox Format (DateEx, "h") 'Результат: 18MsgBox Format (DateEx, "hh") 'Результат: 18MsgBox Format (DateEx, "h: n") 'Результат: 18: 5MsgBox Format (DateEx, "hh: nn") 'Результат: 18:05MsgBox Format (DateEx, "hh: nn: s") 'Результат: 18: 05: 7MsgBox Format (DateEx, "hh: nn: ss") 'Результат: 18:05:07Формат MsgBox (DateEx, "\ T \ i \ m \ e \ \ i \ s \: \ hh: nn: ss")Результат: Время: 18:05:07Конец подписки
wave wave wave wave wave