Shakal07
Дата: Среда, 16.08.2023, 22:38 |
Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 57
Репутация:
0
±
Замечаний:
0% ±
Excel 2k3;2k7;2k10;2k13;2k19
Здравствуйте Имеется таблица поставщиков по городам, необходимо извлечь из листа "Справочник" все товары определенного Поставщика Надо учесть что наименование товара может быть и более 255 символов Желательно чтобы это была формула для Excel 2007 Заранее благодарен
Здравствуйте Имеется таблица поставщиков по городам, необходимо извлечь из листа "Справочник" все товары определенного Поставщика Надо учесть что наименование товара может быть и более 255 символов Желательно чтобы это была формула для Excel 2007 Заранее благодарен Shakal07
Ответить
Сообщение Здравствуйте Имеется таблица поставщиков по городам, необходимо извлечь из листа "Справочник" все товары определенного Поставщика Надо учесть что наименование товара может быть и более 255 символов Желательно чтобы это была формула для Excel 2007 Заранее благодарен Автор - Shakal07 Дата добавления - 16.08.2023 в 22:38
Nic70y
Дата: Четверг, 17.08.2023, 08:06 |
Сообщение № 2
Группа: Друзья
Ранг: Экселист
Сообщений: 9133
Репутация:
2416
±
Замечаний:
0% ±
Excel 2010
с доп.столбцом в справочнике
с доп.столбцом в справочнике Nic70y
К сообщению приложен файл:
15.xlsx
(14.1 Kb)
ЮMoney 41001841029809
Ответить
Сообщение с доп.столбцом в справочнике Автор - Nic70y Дата добавления - 17.08.2023 в 08:06
cmivadwot
Дата: Четверг, 17.08.2023, 22:11 |
Сообщение № 3
Группа: Проверенные
Ранг: Ветеран
Сообщений: 604
Репутация:
115
±
Замечаний:
0% ±
365
Shakal07 , без доп столбца.. по шаблону из поиска... "Поиск ВПР нескольких значений по нескольким условиям.... Как найти несколько значений без дубликатов". Но наверно с доп столбцом надежней.. в 2007
Shakal07 , без доп столбца.. по шаблону из поиска... "Поиск ВПР нескольких значений по нескольким условиям.... Как найти несколько значений без дубликатов". Но наверно с доп столбцом надежней.. в 2007cmivadwot
Сообщение отредактировал cmivadwot - Четверг, 17.08.2023, 23:23
Ответить
Сообщение Shakal07 , без доп столбца.. по шаблону из поиска... "Поиск ВПР нескольких значений по нескольким условиям.... Как найти несколько значений без дубликатов". Но наверно с доп столбцом надежней.. в 2007Автор - cmivadwot Дата добавления - 17.08.2023 в 22:11
bigorq
Дата: Четверг, 17.08.2023, 22:38 |
Сообщение № 4
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 205
Репутация:
47
±
Замечаний:
0% ±
Нет
Shakal07 хотел для 2007, но раз в ход пошел textjoin то так короче
=ОБЪЕДИНИТЬ(", ";1;ЕСЛИ(B11 =Справочник. $B$2:$B$22 ;Справочник. $C$2:$C$22 ;""))
Shakal07 хотел для 2007, но раз в ход пошел textjoin то так короче
=ОБЪЕДИНИТЬ(", ";1;ЕСЛИ(B11 =Справочник. $B$2:$B$22 ;Справочник. $C$2:$C$22 ;""))
bigorq
Ответить
Сообщение Shakal07 хотел для 2007, но раз в ход пошел textjoin то так короче
=ОБЪЕДИНИТЬ(", ";1;ЕСЛИ(B11 =Справочник. $B$2:$B$22 ;Справочник. $C$2:$C$22 ;""))
Автор - bigorq Дата добавления - 17.08.2023 в 22:38
cmivadwot
Дата: Четверг, 17.08.2023, 23:26 |
Сообщение № 5
Группа: Проверенные
Ранг: Ветеран
Сообщений: 604
Репутация:
115
±
Замечаний:
0% ±
365
bigorq , мда... ОБЪЕДИНИТЬ с 2019. "Справочник!" !
bigorq , мда... ОБЪЕДИНИТЬ с 2019. "Справочник!" !cmivadwot
Ответить
Сообщение bigorq , мда... ОБЪЕДИНИТЬ с 2019. "Справочник!" !Автор - cmivadwot Дата добавления - 17.08.2023 в 23:26
прохожий2019
Дата: Воскресенье, 20.08.2023, 19:25 |
Сообщение № 6
Группа: Проверенные
Ранг: Старожил
Сообщений: 1398
Репутация:
364
±
Замечаний:
0% ±
365 Beta Channel
Справочник заблокирован от изменений
тогда допстолбцы на листе для вынимания
Справочник заблокирован от изменений
тогда допстолбцы на листе для выниманияпрохожий2019
Ответить
Сообщение Справочник заблокирован от изменений
тогда допстолбцы на листе для выниманияАвтор - прохожий2019 Дата добавления - 20.08.2023 в 19:25
bigor
Дата: Понедельник, 21.08.2023, 09:33 |
Сообщение № 7
Группа: Проверенные
Ранг: Старожил
Сообщений: 1378
Репутация:
269
±
Замечаний:
0% ±
нет
Shakal07 , еще вариант с допстолбцами, и с лишними запятыми чего то придумать надо без лишних запятых
=ПОДСТАВИТЬ(ПОДСТАВИТЬ(СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СЦЕПИТЬ(F16 ;",";G16 ;",";H16 ;",";I16 ;",";J16 ;",";K16 );" ";"$");",";" "));" ";", ");"$";" ")
Shakal07 , еще вариант с допстолбцами, и с лишними запятыми чего то придумать надо без лишних запятых
=ПОДСТАВИТЬ(ПОДСТАВИТЬ(СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СЦЕПИТЬ(F16 ;",";G16 ;",";H16 ;",";I16 ;",";J16 ;",";K16 );" ";"$");",";" "));" ";", ");"$";" ")
bigor
Сообщение отредактировал bigor - Понедельник, 21.08.2023, 10:07
Ответить
Сообщение Shakal07 , еще вариант с допстолбцами, и с лишними запятыми чего то придумать надо без лишних запятых
=ПОДСТАВИТЬ(ПОДСТАВИТЬ(СЖПРОБЕЛЫ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(СЦЕПИТЬ(F16 ;",";G16 ;",";H16 ;",";I16 ;",";J16 ;",";K16 );" ";"$");",";" "));" ";", ");"$";" ")
Автор - bigor Дата добавления - 21.08.2023 в 09:33
jakim
Дата: Понедельник, 21.08.2023, 09:47 |
Сообщение № 8
Группа: Друзья
Ранг: Старожил
Сообщений: 1218
Репутация:
316
±
Замечаний:
0% ±
Excel 2010
"Кнопочнй" вариант Power Query.
let
Source = Table.NestedJoin(Товары,{"Код поставщика" },Таблица2,{"Код поставщика" },"NewColumn" ,JoinKind.LeftOuter),
#"Expanded NewColumn" = Table.ExpandTableColumn(Source, "NewColumn" , {"Город" , "Код поставщика" , "Поставщик" , "Товары" }, {"NewColumn.Город" , "NewColumn.Код поставщика" , "NewColumn.Поставщик" , "NewColumn.Товары" }),
#"Filtered Rows" = Table.SelectRows(#"Expanded NewColumn" , each ([NewColumn.Город] <> null)),
#"Removed Columns" = Table.RemoveColumns(#"Filtered Rows" ,{"NewColumn.Товары" , "NewColumn.Код поставщика" , "ID" }),
#"Renamed Columns" = Table.RenameColumns(#"Removed Columns" ,{{"NewColumn.Поставщик" , "Поставщик" }, {"NewColumn.Город" , "Город" }}),
#"Grouped Rows" = Table.Group(#"Renamed Columns" , {"Код поставщика" , "Город" , "Поставщик" }, {{"Count" , each _, type table}}),
#"Added Custom" = Table.AddColumn(#"Grouped Rows" , "Custom" , each [Count] [Наименование] ),
#"Extracted Values" = Table.TransformColumns(#"Added Custom" , {"Custom" , each Text.Combine(List.Transform(_, Text.From), ", " ), type text}),
#"Removed Columns1" = Table.RemoveColumns(#"Extracted Values" ,{"Count" }),
#"Reordered Columns" = Table.ReorderColumns(#"Removed Columns1" ,{"Город" , "Код поставщика" , "Поставщик" , "Custom" })
in
#"Reordered Columns"
"Кнопочнй" вариант Power Query.
let
Source = Table.NestedJoin(Товары,{"Код поставщика" },Таблица2,{"Код поставщика" },"NewColumn" ,JoinKind.LeftOuter),
#"Expanded NewColumn" = Table.ExpandTableColumn(Source, "NewColumn" , {"Город" , "Код поставщика" , "Поставщик" , "Товары" }, {"NewColumn.Город" , "NewColumn.Код поставщика" , "NewColumn.Поставщик" , "NewColumn.Товары" }),
#"Filtered Rows" = Table.SelectRows(#"Expanded NewColumn" , each ([NewColumn.Город] <> null)),
#"Removed Columns" = Table.RemoveColumns(#"Filtered Rows" ,{"NewColumn.Товары" , "NewColumn.Код поставщика" , "ID" }),
#"Renamed Columns" = Table.RenameColumns(#"Removed Columns" ,{{"NewColumn.Поставщик" , "Поставщик" }, {"NewColumn.Город" , "Город" }}),
#"Grouped Rows" = Table.Group(#"Renamed Columns" , {"Код поставщика" , "Город" , "Поставщик" }, {{"Count" , each _, type table}}),
#"Added Custom" = Table.AddColumn(#"Grouped Rows" , "Custom" , each [Count] [Наименование] ),
#"Extracted Values" = Table.TransformColumns(#"Added Custom" , {"Custom" , each Text.Combine(List.Transform(_, Text.From), ", " ), type text}),
#"Removed Columns1" = Table.RemoveColumns(#"Extracted Values" ,{"Count" }),
#"Reordered Columns" = Table.ReorderColumns(#"Removed Columns1" ,{"Город" , "Код поставщика" , "Поставщик" , "Custom" })
in
#"Reordered Columns"
jakim
Ответить
Сообщение "Кнопочнй" вариант Power Query.
[vba]
let Source = Тable.NestedJoin(Товары ;{"Код поставщика"};Таблица2 ;{"Код поставщика"};"ЧewColumn";JoinKind.LeftOuter ); Source "Expanded ЧewColumn" = Тable.ExpandТableColumn(each ; "ЧewColumn"; {"Город"; "Код поставщика"; "Поставщик"; "Товары"}; {"ЧewColumn.Город"; "ЧewColumn.Код поставщика"; "ЧewColumn.Поставщик"; "ЧewColumn.Товары"}); NewColumn.Город "Filtered Rows" = Тable.SelectRows(null "Expanded ЧewColumn"; each ([_ ] <> type )); table "Removed Columns" = Тable.RemoveColumns(each "Filtered Rows";{"ЧewColumn.Товары"; "ЧewColumn.Код поставщика"; "ID"}); Count "Renamed Columns" = Тable.RenameColumns(Наименование "Removed Columns";{{"ЧewColumn.Поставщик"; "Поставщик"}; {"ЧewColumn.Город"; "Город"}}); each "Grouped Rows" = Тable.Group(_ "Renamed Columns"; {"Код поставщика"; "Город"; "Поставщик"}; {{"Count"; Text.From type ; text in }}); undefined"Added Custom" = Тable.AddColumn(undefined"Grouped Rows"; "Custom"; undefined [undefined][undefined]); undefined"Extracted Values" = Тable.TransformColumns(undefined"Added Custom"; {"Custom"; undefined Тext.Combine(List.Transform(undefined; undefined); ", "); undefined undefined}); undefined"Removed Columns1" = Тable.RemoveColumns(undefined"Extracted Values";{"Count"}); undefined"Reordered Columns" = Тable.ReorderColumns(undefined"Removed Columns1";{"Город"; "Код поставщика"; "Поставщик"; "Custom"})undefined undefined"Reordered Columns"
[/vba]Автор - jakim Дата добавления - 21.08.2023 в 09:47