Excel разбить дату на составные

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
arturhome
Сообщения: 25
Зарегистрирован: 19 дек 2005, 07:33

Помогите настроить документ
есть к примеру произвольная дата 19.12.2005
её нужно разбить на составные части в разные яйчейки
ну к примеру А1 А2 А3 и т.д
что бы в каждой яйчеке находилась по одной цифре
1 9 1 2 2 0 0 5

пробывал решить проблему с помощью формулы ПСТР но при разбивке она воспринмает дату в виде числа "38705" а не ввиде даты
и поэтому первую цифру пишет 3,
единственный выход нашол писать дату в формате 19122005 формат яйчеки текстовый.. но это немного не удобно получается.
Avsha
Сообщения: 665
Зарегистрирован: 08 сен 2005, 13:47
Откуда: KZ

Попробуйте вариант ...

$D$6=ТДАТА()

=ПСТР(ТЕКСТ($D$6;"ДД.ММ.ГГГГ");1;1)
=ПСТР(ТЕКСТ($D$6;"ДД.ММ.ГГГГ");2;1)
=ПСТР(ТЕКСТ($D$6;"ДД.ММ.ГГГГ");4;1)
=ПСТР(ТЕКСТ($D$6;"ДД.ММ.ГГГГ");5;1)
=ПСТР(ТЕКСТ($D$6;"ДД.ММ.ГГГГ");7;1)
=ПСТР(ТЕКСТ($D$6;"ДД.ММ.ГГГГ");8;1)
=ПСТР(ТЕКСТ($D$6;"ДД.ММ.ГГГГ");9;1)
=ПСТР(ТЕКСТ($D$6;"ДД.ММ.ГГГГ");10;1)
arturhome
Сообщения: 25
Зарегистрирован: 19 дек 2005, 07:33

хм ..спасибо все получилось
Ответить