Функция DateDiff в Excel VBA можно использовать, чтобы получить количество дней между двумя датами.

Поместите командную кнопку на листе и добавьте строки следующего кода:

Dim firstDate As Date, secondDate As Date, n As Integer

firstDate = DateValue("Jan 19, 2020")

secondDate = DateValue("Feb 25, 2020")

n = DateDiff("d", firstDate, secondDate)

MsgBox n

Объяснение: во-первых, мы объявляем две даты. Затем мы инициализируем две даты с помощью функции DATEVALUE. Функция DateDiff имеет три аргумента. Заполните «г» для первого аргумента, так как мы хотим, чтобы количество дней между двумя датами. Наконец, мы используем MsgBox для отображения количества дней между двумя датами.

Результат при нажатии на кнопку управления на листе:

Days between two Dates in Excel VBA

Изменение «d» на «WW», чтобы получить количество недель между двумя датами. Наведите курсор на DateDiff в редакторе Visual Basic и нажмите F1 для получения справки о других интервальных спецификаторах.