Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Формат дат для данных из интернета - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Формат дат для данных из интернета (Формулы/Formulas)
Формат дат для данных из интернета
shukurovakram084 Дата: Воскресенье, 17.10.2021, 06:31 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 0% ±

Здравствуйте.Прикрепляю файл.Файл выгрузил из интернета.Там есть два стольбца который содержить дата и время.Никак не смог форматировать их как дату.Есть ли какой то решение.В файле эти стольбцы сделан заливкой желтого цвета.Нужен чтобы эти стольбцы принимали вид как из соседной ячейки который сделан заливкой зеленого цвета.
К сообщению приложен файл: _10.16.2021-1-.xlsx (12.6 Kb)
 
Ответить
СообщениеЗдравствуйте.Прикрепляю файл.Файл выгрузил из интернета.Там есть два стольбца который содержить дата и время.Никак не смог форматировать их как дату.Есть ли какой то решение.В файле эти стольбцы сделан заливкой желтого цвета.Нужен чтобы эти стольбцы принимали вид как из соседной ячейки который сделан заливкой зеленого цвета.

Автор - shukurovakram084
Дата добавления - 17.10.2021 в 06:31
Pelena Дата: Воскресенье, 17.10.2021, 08:42 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19167
Репутация: 4412 ±
Замечаний: ±

Excel 365 & Mac Excel
Здравствуйте.
Можно в доп. столбец формулу
Код
=--ПОДСТАВИТЬ(ПОДСТАВИТЬ(K6;"-";":";3);"-";":";3)

и формат ячеек скопировать со столбца М.
Протянуть формулу вниз и вправо, потом скопировать/вставить как значения в столбцы K и L
К сообщению приложен файл: 4198129.xlsx (14.1 Kb)


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеЗдравствуйте.
Можно в доп. столбец формулу
Код
=--ПОДСТАВИТЬ(ПОДСТАВИТЬ(K6;"-";":";3);"-";":";3)

и формат ячеек скопировать со столбца М.
Протянуть формулу вниз и вправо, потом скопировать/вставить как значения в столбцы K и L

Автор - Pelena
Дата добавления - 17.10.2021 в 08:42
jakim Дата: Воскресенье, 17.10.2021, 13:48 | Сообщение № 3
Группа: Друзья
Ранг: Старожил
Сообщений: 1197
Репутация: 313 ±
Замечаний: 0% ±

Excel 2010
Power Query
К сообщению приложен файл: date_time.xlsx (26.5 Kb)
 
Ответить
Сообщение
Power Query

Автор - jakim
Дата добавления - 17.10.2021 в 13:48
прохожий2019 Дата: Воскресенье, 17.10.2021, 16:10 | Сообщение № 4
Группа: Проверенные
Ранг: Старожил
Сообщений: 1241
Репутация: 317 ±
Замечаний: 0% ±

365 Beta Channel
Power Query
так попроще, ИМХО [vba]
Код
let
    f=(x)=>[a = Text.Split(x," "),
            b= Text.Replace(a{0},"-","/"),
            c= Text.Replace(a{1},"-",":"),
            d= DateTime.From(b&" "&c)][d],
    lst = {"санаси", "кириш", "чиқиш", "1С га"},

    from = Excel.CurrentWorkbook(){[Name="Table3"]}[Content],
    promote = Table.PromoteHeaders(from),
    transf = Table.TransformColumns(promote,{{"кириш",f},{"чиқиш",f}}),
    to = Table.TransformColumnTypes(transf,List.Transform(lst,(x)=>{x,DateTime.Type}))
in
    to
[/vba] или так (чуть медленнее): [vba]
Код
let
    f=(x)=>[a = Text.SplitAny(x," -"),
            b = DateTime.From(Text.Format("#{0}.#{1}.#{2} #{3}:#{4}:#{5}",a))][b],
    lst = {"санаси", "кириш", "чиқиш", "1С га"},

    from = Table.PromoteHeaders(Excel.CurrentWorkbook(){[Name="Table3"]}[Content]),
    transf = Table.TransformColumns(from,{{"кириш",f},{"чиқиш",f}}),
    to = Table.TransformColumnTypes(transf,List.Transform(lst,(x)=>{x,DateTime.Type}))
in
    to
[/vba]
К сообщению приложен файл: 7832190.xlsx (33.0 Kb)


Сообщение отредактировал прохожий2019 - Воскресенье, 17.10.2021, 19:13
 
Ответить
Сообщение
Power Query
так попроще, ИМХО [vba]
Код
let
    f=(x)=>[a = Text.Split(x," "),
            b= Text.Replace(a{0},"-","/"),
            c= Text.Replace(a{1},"-",":"),
            d= DateTime.From(b&" "&c)][d],
    lst = {"санаси", "кириш", "чиқиш", "1С га"},

    from = Excel.CurrentWorkbook(){[Name="Table3"]}[Content],
    promote = Table.PromoteHeaders(from),
    transf = Table.TransformColumns(promote,{{"кириш",f},{"чиқиш",f}}),
    to = Table.TransformColumnTypes(transf,List.Transform(lst,(x)=>{x,DateTime.Type}))
in
    to
[/vba] или так (чуть медленнее): [vba]
Код
let
    f=(x)=>[a = Text.SplitAny(x," -"),
            b = DateTime.From(Text.Format("#{0}.#{1}.#{2} #{3}:#{4}:#{5}",a))][b],
    lst = {"санаси", "кириш", "чиқиш", "1С га"},

    from = Table.PromoteHeaders(Excel.CurrentWorkbook(){[Name="Table3"]}[Content]),
    transf = Table.TransformColumns(from,{{"кириш",f},{"чиқиш",f}}),
    to = Table.TransformColumnTypes(transf,List.Transform(lst,(x)=>{x,DateTime.Type}))
in
    to
[/vba]

Автор - прохожий2019
Дата добавления - 17.10.2021 в 16:10
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Формат дат для данных из интернета (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!