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

Вход

Регистрация

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

 

= Мир MS Excel/PQ выгрузка данных в формате с нулями перед значением - Мир MS Excel

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

Excel 2016
Добрый день!
Добавил запрос из интернета, выгрузка pricetin в формате .xlsx в котором в столбце C некоторые значения начинаются с нулей,
после выгрузки PQ нули убирает, формат у этих ячеек в pricetin Почтовый индекс, как их выгрузить в PQ запросе с сохранением нулей?
Пробовал менять формат столбца и в Свойствах внешних данных ставить галку сохранить формат для столбца, но при обновлении запроса он меняется.
К сообщению приложен файл: 3212715.xlsx (38.1 Kb)


Сообщение отредактировал Kenibom - Суббота, 06.06.2020, 00:02
 
Ответить
СообщениеДобрый день!
Добавил запрос из интернета, выгрузка pricetin в формате .xlsx в котором в столбце C некоторые значения начинаются с нулей,
после выгрузки PQ нули убирает, формат у этих ячеек в pricetin Почтовый индекс, как их выгрузить в PQ запросе с сохранением нулей?
Пробовал менять формат столбца и в Свойствах внешних данных ставить галку сохранить формат для столбца, но при обновлении запроса он меняется.

Автор - Kenibom
Дата добавления - 05.06.2020 в 23:08
Pelena Дата: Пятница, 05.06.2020, 23:53 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19165
Репутация: 4412 ±
Замечаний: ±

Excel 365 & Mac Excel
Здравствуйте.
Сделайте небольшой файл-пример до 500 кБ и приложите сюда. Внешние ссылки на файлы на форуме запрещены.


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеЗдравствуйте.
Сделайте небольшой файл-пример до 500 кБ и приложите сюда. Внешние ссылки на файлы на форуме запрещены.

Автор - Pelena
Дата добавления - 05.06.2020 в 23:53
Kenibom Дата: Суббота, 06.06.2020, 00:03 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 12
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Pelena, Здравствуйте!
Удалил ссылку и прикрепил новый файл
 
Ответить
СообщениеPelena, Здравствуйте!
Удалил ссылку и прикрепил новый файл

Автор - Kenibom
Дата добавления - 06.06.2020 в 00:03
Pelena Дата: Суббота, 06.06.2020, 09:38 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 19165
Репутация: 4412 ±
Замечаний: ±

Excel 365 & Mac Excel
Как вариант, добавить префикс из нескольких нулей и взять 6 символов справа
К сообщению приложен файл: 7902427.xlsx (43.4 Kb)


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеКак вариант, добавить префикс из нескольких нулей и взять 6 символов справа

Автор - Pelena
Дата добавления - 06.06.2020 в 09:38
Kenibom Дата: Суббота, 06.06.2020, 10:42 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 12
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Pelena, То что нужно, Спасибо!
 
Ответить
СообщениеPelena, То что нужно, Спасибо!

Автор - Kenibom
Дата добавления - 06.06.2020 в 10:42
anvg Дата: Суббота, 06.06.2020, 12:06 | Сообщение № 6
Группа: Друзья
Ранг: Ветеран
Сообщений: 581
Репутация: 271 ±
Замечаний: 0% ±

2016, 365
Доброе время суток.
Думаю, проще воспользоваться Text.PadStart
 
Ответить
СообщениеДоброе время суток.
Думаю, проще воспользоваться Text.PadStart

Автор - anvg
Дата добавления - 06.06.2020 в 12:06
прохожий2019 Дата: Суббота, 06.06.2020, 12:06 | Сообщение № 7
Группа: Проверенные
Ранг: Старожил
Сообщений: 1241
Репутация: 317 ±
Замечаний: 0% ±

365 Beta Channel
вариант [vba]
Код
let
    from = Excel.Workbook(Web.Contents("https://www.tinko.ru/pricelist/pricetin/pricetin.xlsx"), null, true){[Item="Эо",Kind="Sheet"]}[Data],
    typ = Table.TransformColumnTypes(from,{{"Column1", type any}, {"Column2", type any}, {"Column3", type text}, {"Column4", type text}, {"Column5", type text}, {"Column6", type any}, {"Column7", type number}, {"Column8", type number}}),
    del = Table.RemoveColumns(typ,{"Column3", "Column4", "Column7"}),
    order = Table.ReorderColumns(del,{"Column1", "Column5", "Column2", "Column6", "Column8"}),
    to = Table.TransformColumns(order,{"Column2", each try Text.PadStart(Text.From(Number.From(_)),6,"0") otherwise _})
in
    to
[/vba]
К сообщению приложен файл: 6632316.xlsx (40.3 Kb)
 
Ответить
Сообщениевариант [vba]
Код
let
    from = Excel.Workbook(Web.Contents("https://www.tinko.ru/pricelist/pricetin/pricetin.xlsx"), null, true){[Item="Эо",Kind="Sheet"]}[Data],
    typ = Table.TransformColumnTypes(from,{{"Column1", type any}, {"Column2", type any}, {"Column3", type text}, {"Column4", type text}, {"Column5", type text}, {"Column6", type any}, {"Column7", type number}, {"Column8", type number}}),
    del = Table.RemoveColumns(typ,{"Column3", "Column4", "Column7"}),
    order = Table.ReorderColumns(del,{"Column1", "Column5", "Column2", "Column6", "Column8"}),
    to = Table.TransformColumns(order,{"Column2", each try Text.PadStart(Text.From(Number.From(_)),6,"0") otherwise _})
in
    to
[/vba]

Автор - прохожий2019
Дата добавления - 06.06.2020 в 12:06
Kenibom Дата: Суббота, 06.06.2020, 20:55 | Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 12
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
anvg, прохожий2019, Тоже отличный вариант, спасибо за помощь!
 
Ответить
Сообщениеanvg, прохожий2019, Тоже отличный вариант, спасибо за помощь!

Автор - Kenibom
Дата добавления - 06.06.2020 в 20:55
PooHkrd Дата: Понедельник, 08.06.2020, 10:16 | Сообщение № 9
Группа: Пользователи
Ранг: Новичок
Сообщений: 27
Репутация: 7 ±
Замечаний: 0% ±

Office 365
Цитата прохожий2019, 06.06.2020 в 12:06, в сообщении № 7 ()
del = Table.RemoveColumns(typ,{"Column3", "Column4", "Column7"}),
order = Table.ReorderColumns(del,{"Column1", "Column5", "Column2", "Column6", "Column8"}),

Хозяйкам на заметку, такую штуку можно сразу написать так:
[vba]
Код
delANDorder = Table.SelectColumns(typ,{"Column1", "Column5", "Column2", "Column6", "Column8"})
[/vba]
К тому же пару раз натыкался на ситуации, когда интерпретатор игнорировал функцию Table.ReorderColumns, а вот с выборкой столбцов такого не было ни разу.


Вот горшок пустой, он предмет простой...
 
Ответить
Сообщение
Цитата прохожий2019, 06.06.2020 в 12:06, в сообщении № 7 ()
del = Table.RemoveColumns(typ,{"Column3", "Column4", "Column7"}),
order = Table.ReorderColumns(del,{"Column1", "Column5", "Column2", "Column6", "Column8"}),

Хозяйкам на заметку, такую штуку можно сразу написать так:
[vba]
Код
delANDorder = Table.SelectColumns(typ,{"Column1", "Column5", "Column2", "Column6", "Column8"})
[/vba]
К тому же пару раз натыкался на ситуации, когда интерпретатор игнорировал функцию Table.ReorderColumns, а вот с выборкой столбцов такого не было ни разу.

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

365 Beta Channel
Хозяйкам на заметку
вопрос был про нули - в этом коде моя строчка только пятая, остальное от ТС-а
 
Ответить
Сообщение
Хозяйкам на заметку
вопрос был про нули - в этом коде моя строчка только пятая, остальное от ТС-а

Автор - прохожий2019
Дата добавления - 08.06.2020 в 10:32
PooHkrd Дата: Понедельник, 08.06.2020, 13:51 | Сообщение № 11
Группа: Пользователи
Ранг: Новичок
Сообщений: 27
Репутация: 7 ±
Замечаний: 0% ±

Office 365
прохожий2019, дык я к вам без претензий. Чей код увидел, того и процитировал. В файл не смотрел. Значит пусть ТС просвещается.


Вот горшок пустой, он предмет простой...
 
Ответить
Сообщениепрохожий2019, дык я к вам без претензий. Чей код увидел, того и процитировал. В файл не смотрел. Значит пусть ТС просвещается.

Автор - PooHkrd
Дата добавления - 08.06.2020 в 13:51
Мир MS Excel » Вопросы и решения » Вопросы по Excel » PQ выгрузка данных в формате с нулями перед значением (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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