Преобразование даты в число - VBA
Формулировка задачи:
Здравствуйте! Не подскажите как решить такую задачу:
Есть дата рождения, необходимо её преобразовать в число, интерпретируемое VBA как месяц и день рождения.
Решение задачи: «Преобразование даты в число»
textual
Листинг программы
Sub tt() Dim dt As Date, x As String, y As Double dt = "01.12.2015" x = Format(dt, "ddMM") MsgBox x 'или y = Month(dt) & "." & Day(dt) MsgBox y End Sub