Перенос данных из одной таблицы в другую

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

Перенос данных из одной таблицы в другую (Формулы/Formulas)

ElenaHo

Дата: Вторник, 30.11.2021, 13:08 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 13

Репутация: 0 ±

Замечаний: 0% ±

Здравствуйте!
Помогите, пожалуйста, с решением одной задачки. Вроде все просто, а сообразить не могу как это сделать.
Есть две таблицы:
1. Исходные данные, которые присылают мне
2. Таблица которая мне нужна.
Необходимо из одной таблицы переносить данные в другую, но чтобы не учитывались при этом пустые ячейки и данные переносились в вертикальный формат таблицы. Исходная таблица горизонтальная.
Прикрепляю сам файл. Два листа: 1- то что мы имеем, 2- то что должно быть.
Заранее спасибо за помощь

К сообщению приложен файл: 123.xlsx (11.3 Kb)

Ответить

Serge_007

Дата: Вторник, 30.11.2021, 13:47 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 16475

Репутация: 2750 ±

Замечаний: ±

Excel 2016

Здравствуйте

Вам понадобится Редизайнер таблиц (преобразование в плоскую таблицу)

ЮMoney:41001419691823 | WMR:126292472390

Ответить

ElenaHo

Дата: Вторник, 30.11.2021, 17:49 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 13

Репутация: 0 ±

Замечаний: 0% ±

Спасибо. Посмотрела данную таблицу. Удобно очень.

Ответить

jakim

Дата: Вторник, 30.11.2021, 21:16 | Сообщение № 4

Группа: Друзья

Ранг: Старожил

Сообщений: 1218

Репутация: 316 ±

Замечаний: 0% ±

Excel 2010

Power Query

[vba]

Код

let
    Source = Excel.CurrentWorkbook(){[Name="Table2"]}[Content],
    #"Changed Type" = Table.TransformColumnTypes(Source,{{"Column1", type any}, {"ШК короба", type text}, {"2213", type any}, {"2214", type any}, {"2215", type any}, {"2216", type any}, {"2217", type any}, {"2218", type any}}),
    #"Removed Top Rows" = Table.Skip(#"Changed Type",1),
    #"Changed Type1" = Table.TransformColumnTypes(#"Removed Top Rows",{{"Column1", type text}}),
    #"Removed Columns" = Table.RemoveColumns(#"Changed Type1",{"ШК короба"}),
    #"Unpivoted Other Columns" = Table.UnpivotOtherColumns(#"Removed Columns", {"Column1"}, "Attribute", "Value"),
    #"Reordered Columns" = Table.ReorderColumns(#"Unpivoted Other Columns",{"Column1", "Value", "Attribute"}),
    #"Changed Type2" = Table.TransformColumnTypes(#"Reordered Columns",{{"Attribute", Int64.Type}}),
    #"Renamed Columns" = Table.RenameColumns(#"Changed Type2",{{"Value", "количество"}, {"Attribute", "ШК короба"}, {"Column1", "ШК товара"}})
in
    #"Renamed Columns"

[/vba]