Дата VBA как целое число

есть ли способ получить базовое целое число для Date в VBA? Я имею в виду целое число, хранящееся в Excel, для описания дат в памяти с точки зрения количества дней (когда включено время, оно может быть с плавающей запятой, тогда я думаю). Меня интересует только целочисленная часть, хотя . Есть еще одна функция для этого?

Например, на сегодня () я хотел бы получить обратно 40877 ..

Спасибо, ребята;)