Как в VBA дату преобразовать в количество часов? Есть: Excel, VBA и две даты.
Из одной даты вычитаем другую и получаем дату/время: "10.01.1900 00:00:00"
Как вывести эту дату в формате времени: "250:00:00"?
И все это делаем при помощи скрипта VBA в Excel.

Предыдущий
вопрос Следующий
вопрос

Для решения данной задачи в VBA можно использовать следующий код:

Sub ConvertDateToHours()
Dim date1 As Date
Dim date2 As Date
Dim hours As Double
' Присваиваем значения двум датам
date1 = #10.01.2021 12:00:00 AM#
date2 = #10.01.2020 12:00:00 AM#
' Вычисляем разницу между датами в часах
hours = DateDiff("h", date2, date1)
' Отображаем результат в формате "чч:мм:сс"
Debug.Print Format(hours, "hh:mm:ss")
End Sub

Этот код создает две переменные date1 и date2, которые содержат заданные даты. Затем он вычисляет разницу между этими датами в часах с помощью функции DateDiff и выводит результат в формате "чч:мм:сс" с помощью функции Format.

После запуска этого скрипта в окне Immediate Window (нажмите Ctrl + G, чтобы его открыть) будет выведен результат в формате "чч:мм:сс".