Страницы: 1
RSS
Преобразование дат из текстового формата в числовой
 
Ребята, приветствую, помогите преобразовать даты в нормальный вид: пример 01.02.2018
 
Код
=ДАТА(
ПСТР(B1;МИН(ЕСЛИ(ЕЧИСЛО(-ПСТР(B1;СТРОКА($1:$99);1));СТРОКА($1:$99)));ПРОСМОТР(2;1/ЕЧИСЛО(-ПСТР(B1;СТРОКА($1:$99);1));СТРОКА($1:$99))-МИН(ЕСЛИ(ЕЧИСЛО(-ПСТР(B1;СТРОКА($1:$99);1));СТРОКА($1:$99)))+1);
МАКС(ЕСЛИОШИБКА(ПОИСК({"январь":"февраль":"март":"апрель":"май":"июнь":"июль":"август":"сентябрь":"октябрь":"ноябрь":"декабрь"};B1);0));
1)
 
Код
=ДАТАЗНАЧ(ПРАВБ(B1;ДЛСТР(B1)-НАЙТИ(" ";B1;6)) & " " & ЛЕВБ(B1;4))
Изменено: Ігор Гончаренко - 14.11.2022 12:39:35
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
???
Код
ДАТА(ЗНАЧЕН(ЛЕВСИМВ($B1;4));ПОИСКПОЗ(ПРАВСИМВ($B1;ДЛСТР($B1)-НАЙТИ(" ";СЖПРОБЕЛЫ($B1);6));{"январь";"февраль";"март";"апрель";"май";"июнь";"июль";"август";"сентябрь";"октябрь";"ноябрь";"декабрь"};0);1)
???
 
Power Query
Код
let
    Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
    #"Replaced Value" = Table.ReplaceValue(Source,"год","",Replacer.ReplaceText,{"Column1"}),
    #"Changed Type with Locale" = Table.TransformColumnTypes(#"Replaced Value", {{"Column1", type date}}, "ru-RU")
in
    #"Changed Type with Locale"
 
Код
=--(ПСТР(B1;ПОИСК(" ";B1;6)+1;3)&ЛЕВБ(B1;4))

Код
=--(ПСТР(B1&B1;ПОИСК(" ";B1;6)+1;ДЛСТР(B1)-5))
Изменено: _Boroda_ - 14.11.2022 16:15:42
Скажи мне, кудесник, любимец ба’гов...
Страницы: 1
Наверх