Страницы: 1
RSS
Преоброзование даты
 
Добрый день мастера vbs. Помогите пожалуйста. Нужен макрос который переделает сборку цифр в дату. В примере в столбце "А" есть дата не понятного формата необходимо макросом переделать её в нормальную.Функция найти и заменить почемуто не работает. Зарание спасибо.
Изменено: Ascomos - 25.02.2017 19:38:43
 
Ascomos, здравствуйте. Может формулы достаточно будет? Проверяте.
=ДАТАЗНАЧ(ПОДСТАВИТЬ(ЛЕВБ(A1;10);"­";"."))
или
=ДАТАЗНАЧ(ПСТР(A2;9;2)&"."&ПСТР(A2;6;2)&"."&ЛЕВБ(A2;4))
PS Можно еще короче
=--ПОДСТАВИТЬ(ЛЕВБ(A1;10);"­";"/")
Изменено: Bema - 25.02.2017 20:07:49
Если в мире всё бессмысленно, — сказала Алиса, — что мешает выдумать какой-нибудь смысл? ©Льюис Кэрролл
 
Спасибо большое ваша формула помогла.
 
Цитата
Ascomos написал:почемуто не работает
Возможно в "Найти" вводите символ 45, а в Вашем случае нужно 173.
Просто скопируйте его из ячейки или вводите Alt+0173
Страницы: 1
Наверх