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

Вход

Регистрация

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

 

= Мир MS Excel/Динамический выбор таблиц в Power Query - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Динамический выбор таблиц в Power Query
ASM_0408 Дата: Воскресенье, 19.03.2023, 19:50 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 239
Репутация: 0 ±
Замечаний: 0% ±

Excel 2021
Приветствую, всех участников форума!
Второй день бьюсь над вопросом как реализовать динамическую замену в PQ таблиц находящихся в одном файле. Подключаюсь к нему через облако.
Создал таблицу динамических параметров ( в файле расположена на листе3), для замены второй строки "Spets_Table = Источник{[Item="Spets",Kind="Table"]}[Data]," после источника. В интернете много информации как изменить путь к файлу но не изменение таблиц.
Прошу направить в правильном направлении в решении данной задачи
[vba]
Код
let
     Источник = Excel.Workbook(Web.Contents("https://metem59-my.sharepoint.com/personal/np_metem59_onmicrosoft_com/Documents/%D0%9F%D0%97%D0%A1%D0%9C/%D0%AD%D0%BA%D0%BE%D0%BD%D0%BE%D0%BC%D0%B8%D0%BA%D0%B0/%D0%A0%D0%B0%D1%81%D1%87%D0%B5%D1%82%20%D1%81%D1%82%D0%BE%D0%B8%D0%BC%D0%BE%D1%81%D1%82%D0%B8/%D0%A1%D0%BF%D0%B5%D1%86%D0%B8%D1%84%D0%B8%D0%BA%D0%B0%D1%86%D0%B8%D0%B8%20(%D0%9A%D0%BE%D0%BD%D1%81%D1%82%D1%80%D1%83%D0%BA%D1%82%D0%BE%D1%80).xlsm"), null, true),
    Spets_Table = Источник{[Item="Spets",Kind="Table"]}[Data],
    #"Измененный тип" = Table.TransformColumnTypes(Spets_Table,{{"Группа", type any}, {"Номенклатура", type any}, {"Ед. Изм.", type any}, {"Кол-во", type any}})
in
    #"Измененный тип"
[/vba]
Благодарю!
К сообщению приложен файл: 2956787.xlsx (28.0 Kb)


Сообщение отредактировал ASM_0408 - Воскресенье, 19.03.2023, 21:37
 
Ответить
СообщениеПриветствую, всех участников форума!
Второй день бьюсь над вопросом как реализовать динамическую замену в PQ таблиц находящихся в одном файле. Подключаюсь к нему через облако.
Создал таблицу динамических параметров ( в файле расположена на листе3), для замены второй строки "Spets_Table = Источник{[Item="Spets",Kind="Table"]}[Data]," после источника. В интернете много информации как изменить путь к файлу но не изменение таблиц.
Прошу направить в правильном направлении в решении данной задачи
[vba]
Код
let
     Источник = Excel.Workbook(Web.Contents("https://metem59-my.sharepoint.com/personal/np_metem59_onmicrosoft_com/Documents/%D0%9F%D0%97%D0%A1%D0%9C/%D0%AD%D0%BA%D0%BE%D0%BD%D0%BE%D0%BC%D0%B8%D0%BA%D0%B0/%D0%A0%D0%B0%D1%81%D1%87%D0%B5%D1%82%20%D1%81%D1%82%D0%BE%D0%B8%D0%BC%D0%BE%D1%81%D1%82%D0%B8/%D0%A1%D0%BF%D0%B5%D1%86%D0%B8%D1%84%D0%B8%D0%BA%D0%B0%D1%86%D0%B8%D0%B8%20(%D0%9A%D0%BE%D0%BD%D1%81%D1%82%D1%80%D1%83%D0%BA%D1%82%D0%BE%D1%80).xlsm"), null, true),
    Spets_Table = Источник{[Item="Spets",Kind="Table"]}[Data],
    #"Измененный тип" = Table.TransformColumnTypes(Spets_Table,{{"Группа", type any}, {"Номенклатура", type any}, {"Ед. Изм.", type any}, {"Кол-во", type any}})
in
    #"Измененный тип"
[/vba]
Благодарю!

Автор - ASM_0408
Дата добавления - 19.03.2023 в 19:50
прохожий2019 Дата: Воскресенье, 19.03.2023, 21:37 | Сообщение № 2
Группа: Проверенные
Ранг: Старожил
Сообщений: 1264
Репутация: 322 ±
Замечаний: 0% ±

365 Beta Channel
не надо менять строку кода - вы попадаете на Expression.Evaluate, а здесь это вообще не оправдано - см. коменты по коду
[vba]
Код
let
    Источник = Excel.Workbook(Web.Contents("https://metem59-my.sharepoint.com/personal/np_metem59_onmicrosoft_com/Documents/%D0%9F%D0%97%D0%A1%D0%9C/%D0%AD%D0%BA%D0%BE%D0%BD%D0%BE%D0%BC%D0%B8%D0%BA%D0%B0/%D0%A0%D0%B0%D1%81%D1%87%D0%B5%D1%82%20%D1%81%D1%82%D0%BE%D0%B8%D0%BC%D0%BE%D1%81%D1%82%D0%B8/%D0%A1%D0%BF%D0%B5%D1%86%D0%B8%D1%84%D0%B8%D0%BA%D0%B0%D1%86%D0%B8%D0%B8%20(%D0%9A%D0%BE%D0%BD%D1%81%D1%82%D1%80%D1%83%D0%BA%D1%82%D0%BE%D1%80).xlsm"), null, true),
    Table_Name = "SpetsS1", //вот сюда читаете только название таблицы из параметров
    Spets_Table = Источник{[Item=Table_Name,Kind="Table"]}[Data], //и тогда оно подставляется динамически
    #"Измененный тип" = Table.TransformColumnTypes(Spets_Table,{{"Группа", type any}, {"Номенклатура", type any}, {"Ед. Изм.", type any}, {"Кол-во", type any}})
in
    #"Измененный тип"
[/vba]
 
Ответить
Сообщениене надо менять строку кода - вы попадаете на Expression.Evaluate, а здесь это вообще не оправдано - см. коменты по коду
[vba]
Код
let
    Источник = Excel.Workbook(Web.Contents("https://metem59-my.sharepoint.com/personal/np_metem59_onmicrosoft_com/Documents/%D0%9F%D0%97%D0%A1%D0%9C/%D0%AD%D0%BA%D0%BE%D0%BD%D0%BE%D0%BC%D0%B8%D0%BA%D0%B0/%D0%A0%D0%B0%D1%81%D1%87%D0%B5%D1%82%20%D1%81%D1%82%D0%BE%D0%B8%D0%BC%D0%BE%D1%81%D1%82%D0%B8/%D0%A1%D0%BF%D0%B5%D1%86%D0%B8%D1%84%D0%B8%D0%BA%D0%B0%D1%86%D0%B8%D0%B8%20(%D0%9A%D0%BE%D0%BD%D1%81%D1%82%D1%80%D1%83%D0%BA%D1%82%D0%BE%D1%80).xlsm"), null, true),
    Table_Name = "SpetsS1", //вот сюда читаете только название таблицы из параметров
    Spets_Table = Источник{[Item=Table_Name,Kind="Table"]}[Data], //и тогда оно подставляется динамически
    #"Измененный тип" = Table.TransformColumnTypes(Spets_Table,{{"Группа", type any}, {"Номенклатура", type any}, {"Ед. Изм.", type any}, {"Кол-во", type any}})
in
    #"Измененный тип"
[/vba]

Автор - прохожий2019
Дата добавления - 19.03.2023 в 21:37
ASM_0408 Дата: Воскресенье, 19.03.2023, 21:50 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 239
Репутация: 0 ±
Замечаний: 0% ±

Excel 2021
Цитата прохожий2019, 19.03.2023 в 21:37, в сообщении № 2 ()
не надо менять строку кода - вы попадаете на Expression.Evaluate, а здесь это вообще не оправдано - см. коменты по коду

Благодарю, все понятно. Разобрался без проблем все работает
respect
 
Ответить
Сообщение
Цитата прохожий2019, 19.03.2023 в 21:37, в сообщении № 2 ()
не надо менять строку кода - вы попадаете на Expression.Evaluate, а здесь это вообще не оправдано - см. коменты по коду

Благодарю, все понятно. Разобрался без проблем все работает
respect

Автор - ASM_0408
Дата добавления - 19.03.2023 в 21:50
  • Страница 1 из 1
  • 1
Поиск:

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