как в Excel написать программу которая из введеного кода формирует дату

[Galina14]

Подскажите пожалуйста , как в написать специальную программу в Moodle которая из введенного кода выделяет дату.
Должно быть так 4851410222254
где 2 и 3 число год рождения, 4 и 5 месяц, 6 и 7 день.
Спасибо

[A-Michael]

Простите, но это форум по VBA, при чём здесь Moodle?..

[Galina14]

да мне и нужна программа на языке VBA, я не правильно там написала в модуле
Sub kood()
Dim kood As String
kood = Val(InputBox("Введите личный код"))'вводиться код 49514102223
MsgBox kood 'программа должна вывести на экран ваша дата рождения 14.10.1985

End Sub

[Pelena]

Так?

Код: (vb)

MsgBox CDate(Mid(kood, 6, 2) & "." & Mid(kood, 4, 2) & "." & Mid(kood, 2, 2))

[Galina14]

спасибо большое работает

[Galina14]

а еще из этой даты рождения нужно высчитать возраст человека в днях

[Pelena]

Вопрос не по теме

[Galina14]

из получившейся даты подсчитать какой возраст человека (в днях)

[Galina14]

14.10.1985 - сегодняшний день = 11366 (примерно в днях) Нужно чтобы программа вывела это на экран

[Дмитрий Щербаков(The_Prist)]

а еще

а еще на форуме есть правила. Среди них есть такое:

4.16. Запрещено обсуждение, не связанных между собой вопросов в одной теме, например так: «Не получается установить заливку ячейки и еще почему-то у меня не обновляются темы». Первый вопрос следует обсуждать в разделе "Вопросы по Excel и VBA", а второй в разделе "Вопросы по работе форума". Так же не являются связанными темы "поиск последней ячейки" и "копирование ячеек по условию"

поэтому для решения вопроса расчета разницы между датами Вам следует создать новую тему.

Спасибо.

[Galina14]

ясно спасибо