Замена части текста в столбце
LSV
Дата: Пятница, 04.08.2017, 12:58 |
Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация:
0
±
Замечаний:
0% ±
Excel 2013
Здравствуйте. Помогите, пожалуйста, составить формулу. Необходимо найти и заменить в ячейке столбца первую! часть текста (или весь текст) на буквы. Цифровой код необходимо заменить на буквенный (с этим я криво, но справился), задача усложняется тем, что после кода через точку может идти номер и его надо оставить Файл прилагаю.
Здравствуйте. Помогите, пожалуйста, составить формулу. Необходимо найти и заменить в ячейке столбца первую! часть текста (или весь текст) на буквы. Цифровой код необходимо заменить на буквенный (с этим я криво, но справился), задача усложняется тем, что после кода через точку может идти номер и его надо оставить Файл прилагаю. LSV
К сообщению приложен файл:
rrr.xls
(28.0 Kb)
Ответить
Сообщение Здравствуйте. Помогите, пожалуйста, составить формулу. Необходимо найти и заменить в ячейке столбца первую! часть текста (или весь текст) на буквы. Цифровой код необходимо заменить на буквенный (с этим я криво, но справился), задача усложняется тем, что после кода через точку может идти номер и его надо оставить Файл прилагаю. Автор - LSV Дата добавления - 04.08.2017 в 12:58
and_evg
Дата: Пятница, 04.08.2017, 13:03 |
Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 452
Репутация:
78
±
Замечаний:
0% ±
Excel 2007
LSV , А из каких соображений ставятся та или иная буква и их количество?
LSV , А из каких соображений ставятся та или иная буква и их количество?and_evg
Ответить
Сообщение LSV , А из каких соображений ставятся та или иная буква и их количество?Автор - and_evg Дата добавления - 04.08.2017 в 13:03
LSV
Дата: Пятница, 04.08.2017, 13:15 |
Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация:
0
±
Замечаний:
0% ±
Excel 2013
Каждому цифровому коду соответствует буквенный, например 68=aa
Каждому цифровому коду соответствует буквенный, например 68=aa LSV
Ответить
Сообщение Каждому цифровому коду соответствует буквенный, например 68=aa Автор - LSV Дата добавления - 04.08.2017 в 13:15
and_evg
Дата: Пятница, 04.08.2017, 13:17 |
Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 452
Репутация:
78
±
Замечаний:
0% ±
Excel 2007
Каждому цифровому коду соответствует буквенный
А мы должны посредством телепатии об этом узнать?
Каждому цифровому коду соответствует буквенный
А мы должны посредством телепатии об этом узнать?and_evg
Ответить
Сообщение Каждому цифровому коду соответствует буквенный
А мы должны посредством телепатии об этом узнать?Автор - and_evg Дата добавления - 04.08.2017 в 13:17
LSV
Дата: Пятница, 04.08.2017, 13:20 |
Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация:
0
±
Замечаний:
0% ±
Excel 2013
and_evg , Я в таблице написал справа что на что менять, может не совсем корректно.
and_evg , Я в таблице написал справа что на что менять, может не совсем корректно.LSV
Ответить
Сообщение and_evg , Я в таблице написал справа что на что менять, может не совсем корректно.Автор - LSV Дата добавления - 04.08.2017 в 13:20
and_evg
Дата: Пятница, 04.08.2017, 13:21 |
Сообщение № 6
Группа: Проверенные
Ранг: Обитатель
Сообщений: 452
Репутация:
78
±
Замечаний:
0% ±
Excel 2007
без таблицы замены, только общий ответ. Формула на основе
без таблицы замены, только общий ответ. Формула на основе and_evg
Ответить
Сообщение без таблицы замены, только общий ответ. Формула на основе Автор - and_evg Дата добавления - 04.08.2017 в 13:21
InExSu
Дата: Пятница, 04.08.2017, 13:31 |
Сообщение № 7
Группа: Друзья
Ранг: Ветеран
Сообщений: 648
Репутация:
96
±
Замечаний:
0% ±
Excel 2010, 365
Выделите нужный диапазон и ... [vba]Код
Sub ЗаменаМассомInExSu() 'для http://www.excelworld.ru/forum/2-34762-1#227565 Dim cell As Range Масс_1 = Array("68.", "17.", "8.", "33.") Масс_2 = Array("aa", "bb", "ccc", "r") For Each cell In Selection For i = 0 To UBound(Масс_1) cell.Value = _ Replace(cell.Value, Масс_1(i), Масс_2(i)) If cell.Value = _ Replace(Масс_1(i), ".", "") Then _ cell.Value = Масс_2(i) Next i Next End Sub
[/vba]
Выделите нужный диапазон и ... [vba]Код
Sub ЗаменаМассомInExSu() 'для http://www.excelworld.ru/forum/2-34762-1#227565 Dim cell As Range Масс_1 = Array("68.", "17.", "8.", "33.") Масс_2 = Array("aa", "bb", "ccc", "r") For Each cell In Selection For i = 0 To UBound(Масс_1) cell.Value = _ Replace(cell.Value, Масс_1(i), Масс_2(i)) If cell.Value = _ Replace(Масс_1(i), ".", "") Then _ cell.Value = Масс_2(i) Next i Next End Sub
[/vba] InExSu
Разработчик Битрикс24 php, Google Apps Script, VBA Excel Windows/Mac
Сообщение отредактировал InExSu - Пятница, 04.08.2017, 13:55
Ответить
Сообщение Выделите нужный диапазон и ... [vba]Код
Sub ЗаменаМассомInExSu() 'для http://www.excelworld.ru/forum/2-34762-1#227565 Dim cell As Range Масс_1 = Array("68.", "17.", "8.", "33.") Масс_2 = Array("aa", "bb", "ccc", "r") For Each cell In Selection For i = 0 To UBound(Масс_1) cell.Value = _ Replace(cell.Value, Масс_1(i), Масс_2(i)) If cell.Value = _ Replace(Масс_1(i), ".", "") Then _ cell.Value = Масс_2(i) Next i Next End Sub
[/vba] Автор - InExSu Дата добавления - 04.08.2017 в 13:31
_Boroda_
Дата: Пятница, 04.08.2017, 13:32 |
Сообщение № 8
Группа: Модераторы
Ранг: Местный житель
Сообщений: 16674
Репутация:
6479
±
Замечаний:
0% ±
2003; 2007; 2010; 2013 RUS
может не совсем корректно
Нууу, да, есть немного. Вам нужно было дать нам весь список. Примерно так, как я в файле сделал в диапазоне H1:I99 Тогда формулу можно так написатьКод
=ЗАМЕНИТЬ(A2;1;ПОИСК(".";A2&".");ВПР(--ЛЕВБ(A2;ПОИСК(".";A2&".")-1);H$1:I$99;2;))
может не совсем корректно
Нууу, да, есть немного. Вам нужно было дать нам весь список. Примерно так, как я в файле сделал в диапазоне H1:I99 Тогда формулу можно так написатьКод
=ЗАМЕНИТЬ(A2;1;ПОИСК(".";A2&".");ВПР(--ЛЕВБ(A2;ПОИСК(".";A2&".")-1);H$1:I$99;2;))
_Boroda_
К сообщению приложен файл:
rrr_1.xls
(36.5 Kb)
Скажи мне, кудесник, любимец ба’гов... Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
Ответить
Сообщение может не совсем корректно
Нууу, да, есть немного. Вам нужно было дать нам весь список. Примерно так, как я в файле сделал в диапазоне H1:I99 Тогда формулу можно так написатьКод
=ЗАМЕНИТЬ(A2;1;ПОИСК(".";A2&".");ВПР(--ЛЕВБ(A2;ПОИСК(".";A2&".")-1);H$1:I$99;2;))
Автор - _Boroda_ Дата добавления - 04.08.2017 в 13:32
LSV
Дата: Пятница, 04.08.2017, 13:36 |
Сообщение № 9
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация:
0
±
Замечаний:
0% ±
Excel 2013
Спасибо, and_evg , Формула ЗАМЕНИТЬ меняет часть текста на нужный независимо от того что это за текст. Мне же нужно указать, ЕСЛИ перавя часть текстав ячейке ="68.", то заменить её на "аа" Не хватает знания формул в Excel
Спасибо, and_evg , Формула ЗАМЕНИТЬ меняет часть текста на нужный независимо от того что это за текст. Мне же нужно указать, ЕСЛИ перавя часть текстав ячейке ="68.", то заменить её на "аа" Не хватает знания формул в Excel LSV
Ответить
Сообщение Спасибо, and_evg , Формула ЗАМЕНИТЬ меняет часть текста на нужный независимо от того что это за текст. Мне же нужно указать, ЕСЛИ перавя часть текстав ячейке ="68.", то заменить её на "аа" Не хватает знания формул в Excel Автор - LSV Дата добавления - 04.08.2017 в 13:36
LSV
Дата: Пятница, 04.08.2017, 13:42 |
Сообщение № 10
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация:
0
±
Замечаний:
0% ±
Excel 2013
_Boroda_ , Спасибо, большое. То что надо, буду разбираться.
_Boroda_ , Спасибо, большое. То что надо, буду разбираться.LSV
Ответить
Сообщение _Boroda_ , Спасибо, большое. То что надо, буду разбираться.Автор - LSV Дата добавления - 04.08.2017 в 13:42
LSV
Дата: Пятница, 04.08.2017, 13:44 |
Сообщение № 11
Группа: Пользователи
Ранг: Прохожий
Сообщений: 6
Репутация:
0
±
Замечаний:
0% ±
Excel 2013
InExSu , спасибо, до макросов ещё не дошёл )
InExSu , спасибо, до макросов ещё не дошёл )LSV
Ответить
Сообщение InExSu , спасибо, до макросов ещё не дошёл )Автор - LSV Дата добавления - 04.08.2017 в 13:44