Как вытянуть из ячейки часть текста
SlavaK
Дата: Суббота, 22.02.2014, 19:42 |
Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 16
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
Добрый день. Уже несколько дней бьюсь над задачей: есть описание и из него нужно вытащить часть текста. Во вложении пример: из описание нужно вытащить в отдельную ячейку название поставщика.., если названия нет - присваивать значение - Аксессуары.. Заранее спасибо за совет!)
Добрый день. Уже несколько дней бьюсь над задачей: есть описание и из него нужно вытащить часть текста. Во вложении пример: из описание нужно вытащить в отдельную ячейку название поставщика.., если названия нет - присваивать значение - Аксессуары.. Заранее спасибо за совет!) SlavaK
Ответить
Сообщение Добрый день. Уже несколько дней бьюсь над задачей: есть описание и из него нужно вытащить часть текста. Во вложении пример: из описание нужно вытащить в отдельную ячейку название поставщика.., если названия нет - присваивать значение - Аксессуары.. Заранее спасибо за совет!) Автор - SlavaK Дата добавления - 22.02.2014 в 19:42
Pelena
Дата: Суббота, 22.02.2014, 19:48 |
Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19437
Репутация:
4571
±
Замечаний:
±
Excel 365 & Mac Excel
Здравствуйте. А список поставщиков есть?
Здравствуйте. А список поставщиков есть? Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Ответить
Сообщение Здравствуйте. А список поставщиков есть? Автор - Pelena Дата добавления - 22.02.2014 в 19:48
Hugo
Дата: Суббота, 22.02.2014, 19:48 |
Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3741
Репутация:
796
±
Замечаний:
0% ±
365
И чего это Pandora или Saturn не названия? Думаю без списка названий не сделаете при таких условиях.
И чего это Pandora или Saturn не названия? Думаю без списка названий не сделаете при таких условиях. Hugo
webmoney: E265281470651 Z422237915069 USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
Ответить
Сообщение И чего это Pandora или Saturn не названия? Думаю без списка названий не сделаете при таких условиях. Автор - Hugo Дата добавления - 22.02.2014 в 19:48
SlavaK
Дата: Суббота, 22.02.2014, 20:02 |
Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 16
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
Здравствуйте. А список поставщиков есть?
Да, есть, перечень поставщиков: A.P.S ALLIGATOR BIOCODE CENMAX CHAMELEON Citadel CLIFFORD DAVINCI DOBERMAN FALCON ICODE iDatalink JAGUAR KGB MAGIC SYSTEMS MAGNUM MEGUNA MULTICODE NITEO PANDORA PANTERA PIT SATURN SCHER-KHAN SHERIFF SKYBRAKE STARLINE TEC ELECTRONICS TIGER TOMAHAWK VIPER ОКО Аксессуары
Здравствуйте. А список поставщиков есть?
Да, есть, перечень поставщиков: A.P.S ALLIGATOR BIOCODE CENMAX CHAMELEON Citadel CLIFFORD DAVINCI DOBERMAN FALCON ICODE iDatalink JAGUAR KGB MAGIC SYSTEMS MAGNUM MEGUNA MULTICODE NITEO PANDORA PANTERA PIT SATURN SCHER-KHAN SHERIFF SKYBRAKE STARLINE TEC ELECTRONICS TIGER TOMAHAWK VIPER ОКО АксессуарыSlavaK
Ответить
Сообщение Здравствуйте. А список поставщиков есть?
Да, есть, перечень поставщиков: A.P.S ALLIGATOR BIOCODE CENMAX CHAMELEON Citadel CLIFFORD DAVINCI DOBERMAN FALCON ICODE iDatalink JAGUAR KGB MAGIC SYSTEMS MAGNUM MEGUNA MULTICODE NITEO PANDORA PANTERA PIT SATURN SCHER-KHAN SHERIFF SKYBRAKE STARLINE TEC ELECTRONICS TIGER TOMAHAWK VIPER ОКО АксессуарыАвтор - SlavaK Дата добавления - 22.02.2014 в 20:02
Hugo
Дата: Суббота, 22.02.2014, 20:09 |
Сообщение № 5
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3741
Репутация:
796
±
Замечаний:
0% ±
365
И чего это Pandora или Saturn не названия?
И чего это Pandora или Saturn не названия?
Hugo
webmoney: E265281470651 Z422237915069 USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
Ответить
Сообщение И чего это Pandora или Saturn не названия?
Автор - Hugo Дата добавления - 22.02.2014 в 20:09
SlavaK
Дата: Суббота, 22.02.2014, 20:14 |
Сообщение № 6
Группа: Пользователи
Ранг: Новичок
Сообщений: 16
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
И чего это Pandora или Saturn не названия? Думаю без списка названий не сделаете при таких условиях.
Спасибо за уточнение.. Я не очень удачный пример привёл... Pandora и Сатурн - это названия... Дело в том, что в прайсе есть ячейки, которые не содержат вышеуказанных наименований, и для них необходимо присвоить значение - Аксессуары.. Спасибо.
И чего это Pandora или Saturn не названия? Думаю без списка названий не сделаете при таких условиях.
Спасибо за уточнение.. Я не очень удачный пример привёл... Pandora и Сатурн - это названия... Дело в том, что в прайсе есть ячейки, которые не содержат вышеуказанных наименований, и для них необходимо присвоить значение - Аксессуары.. Спасибо.SlavaK
Ответить
Сообщение И чего это Pandora или Saturn не названия? Думаю без списка названий не сделаете при таких условиях.
Спасибо за уточнение.. Я не очень удачный пример привёл... Pandora и Сатурн - это названия... Дело в том, что в прайсе есть ячейки, которые не содержат вышеуказанных наименований, и для них необходимо присвоить значение - Аксессуары.. Спасибо.Автор - SlavaK Дата добавления - 22.02.2014 в 20:14
Hugo
Дата: Суббота, 22.02.2014, 20:33 |
Сообщение № 7
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3741
Репутация:
796
±
Замечаний:
0% ±
365
Я могу помочь только с UDF: [vba]Код
Option Compare Text Function postav(stroka$, diap As Range) Dim a(), el a = diap.Value stroka = " " & stroka & " " For Each el In a If InStr(stroka, " " & el & " ") Then postav = el: Exit Function Next postav = "Аксессуары" End Function
[/vba]
Я могу помочь только с UDF: [vba]Код
Option Compare Text Function postav(stroka$, diap As Range) Dim a(), el a = diap.Value stroka = " " & stroka & " " For Each el In a If InStr(stroka, " " & el & " ") Then postav = el: Exit Function Next postav = "Аксессуары" End Function
[/vba] Hugo
webmoney: E265281470651 Z422237915069 USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
Ответить
Сообщение Я могу помочь только с UDF: [vba]Код
Option Compare Text Function postav(stroka$, diap As Range) Dim a(), el a = diap.Value stroka = " " & stroka & " " For Each el In a If InStr(stroka, " " & el & " ") Then postav = el: Exit Function Next postav = "Аксессуары" End Function
[/vba] Автор - Hugo Дата добавления - 22.02.2014 в 20:33
Pelena
Дата: Суббота, 22.02.2014, 20:52 |
Сообщение № 8
Группа: Админы
Ранг: Местный житель
Сообщений: 19437
Репутация:
4571
±
Замечаний:
±
Excel 365 & Mac Excel
Формула для В2 Код
=ЕСЛИ(ЕНД(ПРОСМОТР(2;1/ПОИСК(Поставщики!$A$1:$A$32;A2);Поставщики!$A$1:$A$32));"Аксессуары";ПРОСМОТР(2;1/ПОИСК(Поставщики!$A$1:$A$32;A2);Поставщики!$A$1:$A$32))
или начиная с Excel 2007 немного короче Код
=ЕСЛИОШИБКА(ПРОСМОТР(2;1/ПОИСК(Поставщики!$A$1:$A$32;A2);Поставщики!$A$1:$A$32);"Аксессуары")
Формула для В2 Код
=ЕСЛИ(ЕНД(ПРОСМОТР(2;1/ПОИСК(Поставщики!$A$1:$A$32;A2);Поставщики!$A$1:$A$32));"Аксессуары";ПРОСМОТР(2;1/ПОИСК(Поставщики!$A$1:$A$32;A2);Поставщики!$A$1:$A$32))
или начиная с Excel 2007 немного короче Код
=ЕСЛИОШИБКА(ПРОСМОТР(2;1/ПОИСК(Поставщики!$A$1:$A$32;A2);Поставщики!$A$1:$A$32);"Аксессуары")
Pelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Ответить
Сообщение Формула для В2 Код
=ЕСЛИ(ЕНД(ПРОСМОТР(2;1/ПОИСК(Поставщики!$A$1:$A$32;A2);Поставщики!$A$1:$A$32));"Аксессуары";ПРОСМОТР(2;1/ПОИСК(Поставщики!$A$1:$A$32;A2);Поставщики!$A$1:$A$32))
или начиная с Excel 2007 немного короче Код
=ЕСЛИОШИБКА(ПРОСМОТР(2;1/ПОИСК(Поставщики!$A$1:$A$32;A2);Поставщики!$A$1:$A$32);"Аксессуары")
Автор - Pelena Дата добавления - 22.02.2014 в 20:52
SlavaK
Дата: Суббота, 22.02.2014, 21:19 |
Сообщение № 9
Группа: Пользователи
Ранг: Новичок
Сообщений: 16
Репутация:
0
±
Замечаний:
0% ±
Excel 2007
Супер!) всё работает! П.с. отблагодарить смогу уже в понедельник на вебмани
Супер!) всё работает! П.с. отблагодарить смогу уже в понедельник на вебмани SlavaK
Ответить
Сообщение Супер!) всё работает! П.с. отблагодарить смогу уже в понедельник на вебмани Автор - SlavaK Дата добавления - 22.02.2014 в 21:19