|
Заменить последние два символа в ячейке |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
||||||||
Ответить |
Skip to content
В статье объясняется на примерах как работают функции Excel ЗАМЕНИТЬ (REPLACE в английской версии) и ПОДСТАВИТЬ (SUBSTITUTE по-английски). Мы покажем, как использовать функцию ЗАМЕНИТЬ с текстом, числами и датами, а также как вложить несколько функций ЗАМЕНИТЬ или ПОДСТАВИТЬ в одну формулу.
Функции Excel ЗАМЕНИТЬ и ПОДСТАВИТЬ используются для замены одной буквы или части текста в ячейке. Но делают они это немного по-разному. Об этом и поговорим далее.
Как работает функция ЗАМЕНИТЬ
Функция ЗАМЕНИТЬ позволяет заместить слово, один или несколько символов в текстовой строке другим словом или символом.
ЗАМЕНИТЬ(старый_текст; начальная_позиция; число_знаков, новый_текст)
Как видите, функция ЗАМЕНИТЬ имеет 4 аргумента, и все они обязательны для заполнения.
- Старый_текст — исходный текст (или ссылка на ячейку с исходным текстом), в котором вы хотите поменять некоторые символы.
- Начальная_позиция — позиция первого символа в старый_текст, начиная с которого вы хотите сделать замену.
- Число_знаков — количество символов, которые вы хотите заместить новыми.
- Новый_текст – текст замены.
Например, чтобы исправить слово «кит» на «кот», следует поменять вторую букву в слове. Вы можете использовать следующую формулу:
=ЗАМЕНИТЬ(«кит»;2;1;»о»)
И если вы поместите исходное слово в какую-нибудь ячейку, скажем, A2, вы можете указать соответствующую ссылку на ячейку в аргументе старый_текст:
=ЗАМЕНИТЬ(А2;2;1;»о»)
Примечание. Если аргументы начальная_позиция или число_знаков отрицательные или не являются числом, формула замены возвращает ошибку #ЗНАЧ!.
Использование функции ЗАМЕНИТЬ с числами
Функция ЗАМЕНИТЬ предназначена для работы с текстом. Но безусловно, вы можете использовать ее для замены не только букв, но и цифр, являющихся частью текстовой строки, например:
=ЗАМЕНИТЬ(A1; 9; 4; «2023»)
Обратите внимание, что мы заключаем «2023» в двойные кавычки, как вы обычно делаете с текстовыми значениями.
Аналогичным образом вы можете заменить одну или несколько цифр в числе. Например формула:
=ЗАМЕНИТЬ(A1;3;2;»23″)
И снова вы должны заключить значение замены в двойные кавычки («23»).
Примечание. Формула ЗАМЕНИТЬ всегда возвращает текстовую строку, а не число. На скриншоте выше обратите внимание на выравнивание по левому краю возвращаемого текстового значения в ячейке B1 и сравните его с исходным числом, выровненным по правому краю в A1. А поскольку это текст, вы не сможете использовать его в других вычислениях, пока не преобразуете его обратно в число, например, умножив на 1 или используя любой другой метод, описанный в статье Как преобразовать текст в число.
Как заменить часть даты
Как вы только что видели, функция ЗАМЕНИТЬ отлично работает с числами, за исключением того, что она возвращает текстовую строку 
Помните, что во внутренней системе Excel даты хранятся в виде чисел. Поэтому нельзя пытаться заменить часть даты, работая с ней как с текстом.
Например, у вас есть дата в A3, скажем, 15 июля 1992г., и вы хотите изменить «июль» на «май». Итак, вы пишете формулу ЗАМЕНИТЬ(A3; 4; 3; «Май»), которая предписывает Excel поменять 3 символа в ячейке A3, начиная с четвертого. Мы получили следующий результат:
Почему так? Потому что «15-июл-92» — это только визуальное представление базового серийного номера (33800), представляющего дату. Итак, наша формула замены заменяет цифры начиная с четвертой (а это два нуля) в указанном выше числе на текст «Май» и возвращает в результате текстовую строку «338Май».
Чтобы заставить функцию ЗАМЕНИТЬ правильно работать с датами, вы должны сначала преобразовать даты в текстовые строки, используя функцию ТЕКСТ. Кроме того, вы можете встроить функцию ТЕКСТ непосредственно в аргумент старый_текст функции ЗАМЕНИТЬ:
=ЗАМЕНИТЬ(ТЕКСТ(A3; «дд-ммм-гг»); 4; 3; «Май»)
Помните, что результатом приведенной выше формулы является текстовая строка, и поэтому это решение работает только в том случае, если вы не планируете использовать измененные даты в своих дальнейших расчетах. Если вам нужны даты, а не текстовые строки, используйте функцию ДАТАЗНАЧ , чтобы преобразовать значения, возвращаемые функцией Excel ЗАМЕНИТЬ, обратно в даты:
=ДАТАЗНАЧ(ЗАМЕНИТЬ(ТЕКСТ(A3; «дд-ммм-гг»); 4; 3; «Май»))
Как заменить сразу несколько букв или слов
Довольно часто может потребоваться выполнить более одной замены в одной и той же ячейке Excel. Конечно, можно было сделать одну замену, вывести промежуточный результат в дополнительный столбец, а затем снова использовать функцию ЗАМЕНИТЬ. Однако лучший и более профессиональный способ — использовать вложенные функции ЗАМЕНИТЬ, которые позволяют выполнить сразу несколько замен с помощью одной формулы. В этом смысле «вложение» означает размещение одной функции внутри другой.
Рассмотрим следующий пример. Предположим, у вас есть список телефонных номеров в столбце A, отформатированный как «123456789», и вы хотите сделать их более похожими на привычные нам телефонные номера, добавив дефисы. Другими словами, ваша цель — превратить «123456789» в «123-456-789».
Вставить первый дефис легко. Вы пишете обычную формулу замены Excel, которая заменяет ноль символов дефисом, т.е. просто добавляет дефис на четвёртой позиции в ячейке:
=ЗАМЕНИТЬ(A3;4;0;»-«)
Результат приведенной выше формулы замены выглядит следующим образом:
А теперь нам нужно вставить еще один дефис в восьмую позицию. Для этого вы помещаете приведенную выше формулу в еще одну функцию Excel ЗАМЕНИТЬ. Точнее, вы встраиваете её в аргумент старый_текст другой функции, чтобы вторая функция ЗАМЕНИТЬ обрабатывала значение, возвращаемое первой формулой, а не первоначальное значение из ячейки А3:
=ЗАМЕНИТЬ(ЗАМЕНИТЬ(A3;4;0;»-«);8;0;»-«)
В результате вы получаете номера телефонов в нужном формате:
Аналогичным образом вы можете использовать вложенные функции ЗАМЕНИТЬ, чтобы текстовые строки выглядели как даты, добавляя косую черту (/) там, где это необходимо:
=ЗАМЕНИТЬ(ЗАМЕНИТЬ(A3;3;0;»/»);6;0;»/»)
Кроме того, вы можете преобразовать текстовые строки в реальные даты, обернув приведенную выше формулу ЗАМЕНИТЬ функцией ДАТАЗНАЧ:
=ДАТАЗНАЧ(ЗАМЕНИТЬ(ЗАМЕНИТЬ(A3;3;0;»/»);6;0;»/»))
И, естественно, вы не ограничены в количестве функций, которые вы можете последовательно, как матрёшки, вложить друг в друга в одной формуле (современные версии Excel позволяют использовать до 8192 символов и до 64 вложенных функций в одной формуле).
Например, вы можете попробовать 3 вложенные функции ЗАМЕНИТЬ, чтобы число отображалось как дата и время:
=ЗАМЕНИТЬ(ЗАМЕНИТЬ(ЗАМЕНИТЬ(ЗАМЕНИТЬ(A3;3;0;»/»);6;0;»/»);9;0;» «);12;0;»:»)
Как заменить текст в разных местах
До сих пор во всех примерах мы имели дело с простыми задачами и производили замены в одной и той же позиции в каждой ячейке. Но реальные задачи часто бывают сложнее. В ваших рабочих листах заменяемые символы могут не обязательно появляться в одном и том же месте в каждой ячейке, и поэтому вам придется найти позицию первого символа, начиная с которого нужно заменить часть текста. Следующий пример продемонстрирует то, о чем я говорю.
Предположим, у вас есть список адресов электронной почты в столбце A. И название одной компании изменилось с «ABC» на, скажем, «BCA». Изменилось и название их почтового домена. Таким образом, вы должны соответствующим образом обновить адреса электронной почты всех клиентов и заменить три буквы в адресах электронной почты, где это необходимо.
Но проблема в том, что имена почтовых ящиков имеют разную длину, и поэтому нельзя указать, с какой именно позиции начинается название домена. Другими словами, вы не знаете, какое значение указать в аргументе начальная_позиция функции Excel ЗАМЕНИТЬ. Чтобы узнать это, используйте функцию Excel НАЙТИ, чтобы определить позицию, с которой начинается доменное имя в адресе электронной почты:
=НАЙТИ(«@abc»; A3)
Затем вставьте указанную выше функцию НАЙТИ в аргумент начальная_позиция формулы ЗАМЕНИТЬ:
=ЗАМЕНИТЬ(A3; НАЙТИ(«@abc»;A3); 4; «@bca»)
Примечание. Мы включаем символ «@» в нашу формулу поиска и замены Excel, чтобы избежать случайных ошибочных замен в именах почтовых ящиков электронной почты. Конечно, вероятность того, что такие совпадения произойдут, очень мала, и все же вы можете перестраховаться.
Как вы видите на скриншоте ниже, у формулы нет проблем, чтобы поменять символы в разных позициях. Однако если заменяемая текстовая строка не найдена и менять в ней ничего не нужно, формула возвращает ошибку #ЗНАЧ!:
И мы хотим, чтобы формула вместо ошибки возвращала исходный адрес электронной почты без изменения. Для этого заключим нашу формулу НАЙТИ И ЗАМЕНИТЬ в функцию ЕСЛИОШИБКА:
=ЕСЛИОШИБКА(ЗАМЕНИТЬ(A3; НАЙТИ(«@abc»;A3); 4; «@bca»);A3)
И эта доработанная формула прекрасно работает, не так ли?
Заменить заглавные буквы на строчные и наоборот
Еще один полезный пример – заменить первую строчную букву в ячейке на прописную (заглавную). Всякий раз, когда вы имеете дело со списком имен, товаров и т.п., вы можете использовать приведенную ниже формулу, чтобы изменить первую букву на ЗАГЛАВНУЮ. Ведь названия товаров могут быть записаны по-разному, а в списках важно единообразие.
Таким образом, нам нужно заменить первый символ в тексте на заглавную букву. Используем формулу
=ЗАМЕНИТЬ(СТРОЧН(A3);1;1;ПРОПИСН(ЛЕВСИМВ(A3;1)))
Как видите, эта формула сначала заменяет все буквы в тексте на строчные при помощи функции СТРОЧН, а затем первую строчную букву меняет на заглавную (прописную).
Быть может, это будет полезно.
Описание функции ПОДСТАВИТЬ
Функция ПОДСТАВИТЬ в Excel заменяет один или несколько экземпляров заданного символа или текстовой строки указанными символами.
Синтаксис формулы ПОДСТАВИТЬ в Excel следующий:
ПОДСТАВИТЬ(текст, старый_текст, новый_текст, [номер_вхождения])
Первые три аргумента являются обязательными, а последний – нет.
- Текст – исходный текст, в котором вы хотите заменить слова либо отдельные символы. Может быть тестовой строой, ссылкой на ячейку или же результатом вычисления другой формулы.
- Старый_текст – что именно вы хотите заменить.
- Новый_текст – новый символ или слово для замены старого_текста.
- Номер_вхождения — какой по счёту экземпляр старый_текст вы хотите заменить. Если этот параметр опущен, все вхождения старого текста будут заменены новым текстом.
Например, все приведенные ниже формулы подставляют вместо «1» – цифру «2» в ячейке A2, но возвращают разные результаты в зависимости от того, какое число указано в последнем аргументе:
=ПОДСТАВИТЬ(A3;»1″;»2″;1) — Заменяет первое вхождение «1» на «2».
=ПОДСТАВИТЬ(A3;»1″;»2″;2) — Заменяет второе вхождение «1» на «2».
=ПОДСТАВИТЬ(A3;»1″;»2″) — Заменяет все вхождения «1» на «2».
На практике формула ПОДСТАВИТЬ также используется для удаления ненужных символов из текста. Вы просто меняете их на пустую строку “”.
Например, чтобы удалить пробелы из текста, замените их на пустоту.
=ПОДСТАВИТЬ(A3;» «;»»)
Примечание. Функция ПОДСТАВИТЬ в Excel чувствительна к регистру . Например, следующая формула меняет все вхождения буквы «X» в верхнем регистре на «Y» в ячейке A2, но не заменяет ни одной буквы «x» в нижнем регистре.
=ПОДСТАВИТЬ(A3;»Х»;»Y»)
Замена нескольких значений одной формулой
Как и в случае с функцией ЗАМЕНИТЬ, вы можете вложить несколько функций ПОДСТАВИТЬ в одну формулу, чтобы сделать несколько подстановок одновременно, т.е. заменить несколько символов или подстрок при помощи одной формулы.
Предположим, у вас есть текстовая строка типа « пр1, эт1, з1 » в ячейке A3, где «пр» означает «Проект», «эт» означает «этап», а «з» означает «задача». Вы хотите заместить три этих кода их полными эквивалентами. Для этого вы можете написать 3 разные формулы подстановки:
=ПОДСТАВИТЬ(A3;»пр»;»Проект «)
=ПОДСТАВИТЬ(A3;»эт»;»Этап «)
=ПОДСТАВИТЬ(A3;»з»;»Задача «)
А затем вложить их друг в друга:
=ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(A3;»пр»;»Проект «); «эт»;»Этап «);»з»;»Задача «)
Обратите внимание, что мы добавили пробел в конце каждого аргумента новый_текст для лучшей читабельности.
Другие полезные применения функции ПОДСТАВИТЬ:
- Замена неразрывных пробелов в ячейке Excel обычными
- Убрать пробелы в числах
- Удалить перенос строки в ячейке
- Подсчитать определенные символы в ячейке
Что лучше использовать – ЗАМЕНИТЬ или ПОДСТАВИТЬ?
Функции Excel ЗАМЕНИТЬ и ПОДСТАВИТЬ очень похожи друг на друга в том смысле, что обе они предназначены для подмены отдельных символов или текстовых строк. Различия между двумя функциями заключаются в следующем:
- ПОДСТАВИТЬ замещает один или несколько экземпляров данного символа или текстовой строки. Итак, если вы знаете тот текст, который нужно поменять, используйте функцию Excel ПОДСТАВИТЬ.
- ЗАМЕНИТЬ замещает символы в указанной позиции текстовой строки. Итак, если вы знаете положение заменяемых символов, используйте функцию Excel ЗАМЕНИТЬ.
- Функция ПОДСТАВИТЬ в Excel позволяет добавить необязательный параметр (номер_вхождения), указывающий, какой по счету экземпляр старого_текста следует заместить на новый_текст.
Вот как вы можете заменить текст в ячейке и использовать функции ПОДСТАВИТЬ и ЗАМЕНИТЬ в Excel. Надеюсь, эти примеры окажутся полезными при решении ваших задач.
Megga
Пользователь
Сообщений: 20
Регистрация: 26.06.2018
Добрый вечер! Уже третий мой вопрос за два дня, но дело не делается, а уже чуть ли не ногами пинают 
Такая ситуация: есть такой текст в строке «ТС N BE Д-RU.АУ40.B.05495». Здесь «BE» — это латиница, и «B» тоже, но она должна быть на кириллице. Понятно, что заменив все латинские «B» на наши не выйдет, значение «BE» должно остаться на латинском. Как мне заменить именно СЕДЬМОЙ символ с КОНЦА. Слева отсчитывать не получиться, там разное количество может быть символов, а вот с конца всегда одинаково. Спасибо!
ПРАВСИМВ, ПРАВБ (функции ПРАВСИМВ, ПРАВБ)
В этой статье описаны синтаксис формулы и использование функций ПРАВСИМВ и ПРАВБ в Microsoft Excel.
Описание
Функция ПРАВСИМВ возвращает последний символ или несколько последних символов текстовой строки на основе заданного числа символов.
Функция ПРАВБ возвращает последний символ или несколько последних символов текстовой строки на основе заданного числа байтов.
Эти функции могут быть доступны не на всех языках.
Функция ПРАВСИМВ предназначена для языков с однобайтовой кодировкой, а ПРАВБ — для языков с двухбайтовой кодировкой. Язык по умолчанию, заданный на компьютере, влияет на возвращаемое значение следующим образом.
Функция ПРАВСИМВ всегда считает каждый символ (одно- или двухбайтовый) за один вне зависимости от языка по умолчанию.
Функция ПРАВБ считает каждый двухбайтовый символ за два, если включена поддержка ввода на языке с двухбайтовой кодировкой, а затем этот язык назначен языком по умолчанию. В противном случае функция ПРАВБ считает каждый символ за один.
К языкам, поддерживающим БДЦС, относятся японский, китайский (упрощенное письмо), китайский (традиционное письмо) и корейский.
Синтаксис
Аргументы функций ПРАВСИМВ и ПРАВБ описаны ниже.
Текст Обязательный. Текстовая строка, содержащая символы, которые требуется извлечь.
Число_знаков Необязательный. Количество символов, извлекаемых функцией ПРАВСИМВ.
Значение «число_знаков» должно быть больше нуля или равно ему.
Если значение «число_знаков» превышает длину текста, функция ПРАВСИМВ возвращает весь текст.
Если значение «число_знаков» опущено, оно считается равным 1.
Число_байтов Необязательный. Количество символов, извлекаемых функцией ПРАВБ.
Num_bytes должен быть больше нуля или равен нулю.
Если num_bytes больше, чем длина текста, то right возвращает весь текст.
Если num_bytes опущен, предполагается, что это 1.
Пример
Скопируйте образец данных из следующей таблицы и вставьте их в ячейку A1 нового листа Excel. Чтобы отобразить результаты формул, выделите их и нажмите клавишу F2, а затем — клавишу ВВОД. При необходимости измените ширину столбцов, чтобы видеть все данные.
Добрый день, форумчане.
Есть столбец в 990000 строк с кодами такого типа:
34857
54646
45675
45698
34678
Надо чтобы около него был столбец с кодами такого типа:
43800
54600
45600
45600
34600
То есть чтобы все последние 2 цифры стали «0».
Добрый день, форумчане.
Есть столбец в 990000 строк с кодами такого типа:
34857
54646
45675
45698
34678
Надо чтобы около него был столбец с кодами такого типа:
43800
54600
45600
45600
34600
То есть чтобы все последние 2 цифры стали «0».
Сообщение Добрый день, форумчане.
Есть столбец в 990000 строк с кодами такого типа:
34857
54646
45675
45698
34678
Надо чтобы около него был столбец с кодами такого типа:
43800
54600
45600
45600
34600
То есть чтобы все последние 2 цифры стали «0».
Заранее спасибо. Автор — DonPedro3x
Дата добавления — 18.10.2015 в 15:40
Как удалить ненужные символы в Excel
Смотрите также — 1) End примере » « примера, будут закрыватьсяTiLu столбце =»a»&A1, протянуть,: Микки наили англ. вариант ENTER (принять и
- в функции ПСТР формулу, но в «)&») рубл»&ВПР (ОСТАТ (n_4;ПСТР (ТЕКСТ (A1;n0);1;1)+1)&ИНДЕКС была, простите, эта
просто удалить последний 02-05-1990 ——Функция If Next End (двойной пробел) на или удаляться.
- : Ребят помогите, Нужна скопировать, вставить какВаша формула работает,опять же нажать
=MID(A1,1,LEN(A1)-1) перейти к след. — это количество ней приписала, только (МАКС (ОСТАТ (ПСТР (n0x;ПСТР (ТЕКСТ (A1;n0);2;1)+1;ПСТР спешка все! знак, т.е. форматАбдирахманов Абдусатор Рахманбердиевич
TRIM Sub
» » (одиночный
kidlena
формула которая уберет
office-guru.ru
Убрать последние символы в ячейке
значение в А, но если можно для полного счастияAlex0070 ячейке), остановить запись возвращаемых знаков. Если одно условие, а (ТЕКСТ (A1;n0);11;2)-11;100);9);10);{0;»ь «:1;»я (ТЕКСТ (A1;n0);3;1)+1)&ЕСЛИ (-ПСТР
Теперь если первое должен быть 5-значным,
21-04-1980 9086445778(СЖПРОБЕЛЫ) удаляет все
olegerius пробел)
: Извините. прикладываю. Кстати повторяющиеся символы в
удалить другой столбец. обьясните, как её
заменить все: Спасибо Yurii_74, сейчас
макроса. Результат работы оставить 10, то
надо несколько. «:4;»ей «};2)&ПРАВСИМВ (ТЕКСТ
(ТЕКСТ (A1;n0);1;3);»миллиард»&ВПР (ПСТР число не равно
чтобы сохранить вАбдихаликов Аъзамжон Адихамжанович лишние пробелы из: Спасибо за ответ.
2. Замена комбинаций приложить файл не строке…Serge применить ко всемуfischerspooner
попробую эти способы – в обрабатываемую ПСТР вернет подстроку
200?'200px':''+(this.scrollHeight+5)+'px');">=ЕСЛИ(ПРАВСИМВ($B2;3)="(1)";ПСТР($B2;1;ДЛСТР($B2)-3);$B2)
(A1;n0);2)&» копе»&ВПР (ОСТАТ (ТЕКСТ (A1;n0);3;1)*И (ПСТР
нулю, то в
некоторых ячейках стобца
22-06-1979 9027629832
строки, если ониИ по аналогии символов — в
всегда удается сайт
допустим есть строка:: На полтора ляма столбцу? (Для чайников): Спасибо огромное, думалfischerspooner
ячейку поставит содержимое
вместе со скобочкойОформляйте формулы тегами! (МАКС (ОСТАТ (ПРАВСИМВ (ТЕКСТ (A1;n0);2;1)-1);мил; 2);»»)&ИНДЕКС результате пропадают 2
excelworld.ru
Как отсечь, убрать последний знак в ячейке
первые 2 илиАбдулаев Арсен Микаилович
есть. Функция добавил удаление первого
примере «, ,» вылетает (размер файла 1, 2, 5, строк ушло 10
И потом при будет сложнее, всё: как удалить опред. ячейки, на которой «(«. Нам она На первый раз (ТЕКСТ (A1;n0);2)-11;100);9);10);{0;»йка»:1;»йки»:4;»ек»};2);» )»;»)»))-10);ПОДСТАВИТЬ (n_4;ПСТР (ТЕКСТ (A1;n0);4;1)+1)&ИНДЕКС последние знака, а
2 знака нули.
05-07-1971 ——CLEAN
пробела в строке… (запятая пробел запятая) менее 100 Kb). 7, 9, 10,
секунд. удалении исправленного столбца
действ. просто. Удачи символ в ячейках, записывался макрос (в
не нужна, поэтому поправила. (ТЕКСТ (ОТБР (A1;0);»#
(n0x;ПСТР (ТЕКСТ (A1;n0);5;1)+1;ПСТР впереди появляется 0
Спасибо.Абдулаева Галина Николаевна
(ПЕЧСИМВ) удаляет всеSub test() ‘Поиск на «,» (запятая) Последний пример был
12, 1, 3,Или макрос написать, в новом пишетсяlav-ich содержащих текст, например данном случае первой), возвращаем на 1
Manyasha ##0_ «) & (ТЕКСТ (A1;n0);6;1)+1)&ЕСЛИ (-ПСТР
Smileyvikttur 24-04-1965 ——
непечатные символы из и замена Cells.Replace3. Удаление в вчера, создавала тему 7,
но тут я какая то хрень!: Добрые люди подскажите
одна ячейка содержит вместо того, чтобы символ меньше.: «(» & ПОДСТАВИТЬ (ТЕКСТ (A1;n0);4;3);»миллион»&ВПР (ПСТР
: А можете более: =ЛЕВБ(A1;5)Абдулин Данис Файзрахманович строки. What:=» «, Replacement:=» начале текста ячейки
удалось приложить файлдолжно получиться: 1, не силён…lav-ich
Кто может. Есть текст: 10W;15W
обработать содержимое выделеннойвот так наверное
Любознатель (ПРОПНАЧ (ИНДЕКС (n_4;ПСТР (ТЕКСТ (A1;n0);6;1)*И (ПСТР
полный список возможныхВнутренний голос подсказывает,
15-08-1949 ——К примеру, ячейка «, LookAt:=xlPart, SearchOrder пробела
planetaexcel.ru
Как удалить правые 11 символов в экселе? Имеется ячейка вида «Андрей89085555555» . Нужно чтобы осталось только имя.
только после создания 2, 5, 7,Headin: The_Prist столбец 58000ячеек сдр. ячейка содержит
ячейки. понятнее:, а скобочки только (ТЕКСТ (A1;n0);1;1)+1)&ИНДЕКС (n0x;ПСТР (ТЕКСТ (A1;n0);5;1)-1);мил; 2);»»)&ИНДЕКС
вариантов дать? что нужно видетькаким образом вA1
_ :=xlByRows, MatchCase:=False,4. Удаление символа темы иначе на 9, 10, 12,
: А как вставитьА реально сделать комбинациями цифр от текст: 45WWПолучилось так:200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ПСТР(B2;1;ЕСЛИОШИБКА(ПОИСК(«(?)»;B2)-1;999))
в конце могут (ТЕКСТ (A1;n0);2;1)+1;ПСТР (ТЕКСТ (n_4;ПСТР (ТЕКСТ (A1;n0);7;1)+1)&ИНДЕКСvikttur Ваши данные, что ячейке оставить толькона рисунке ниже SearchFormat:=False, ReplaceFormat:=False Cells.Replace «,» (запятая) в работало. 3 символ? Думаю, тема проще: просто вставить пяти знаков донеобх. удалить символSub Макрос1()Если в строке встречаться? (A1;n0);3;1)+1)&ЕСЛИ (-ПСТР (ТЕКСТ (n1x;ПСТР (ТЕКСТ (A1;n0);8;1)+1;ПСТР: =0&ЛЕВБ(ТЕКСТ(A2;»00000″);4) все не так. фамилию имя и содержит строку «Excel Easy» What:=», ,», Replacement:=»,», конце текста ячейкиА проблема таik одна. Имеется столбец в каждую ячейку 10. Необходимо удалить W .’ нет части «(?)»,Если да, то (A1;n0);1;3);»миллиард»&ВПР (ПСТР (ТЕКСТ (ТЕКСТ (A1;n0);9;1)+1)&ЕСЛИ (-ПСТРDimitrSmiley отчество? (с двумя пробелами). LookAt:=xlPart, SearchOrder _ — именно запятую же. Убрать заданное: просите одно, пример строк на 300, столбца любую букву определённую комбинацию изЗаранее благодарю, пишу’ Макрос1 Макрос нам нужно оставить можно так: (A1;n0);3;1)*И (ПСТР (ТЕКСТ (ТЕКСТ (A1;n0);7;3);ВПР (ПСТР: Прикрепил: =ЛЕВСИМВ(ТЕКСТ(A2;»000000″);ДЛСТР(ТЕКСТ(A2;»000000″))-1)mrSEDПримечание: :=xlByRows, MatchCase:=False, SearchFormat:=False, а не последний количество первых символов приводите другой… в нем 20-значные первой и потом 3 цифр именно повторно, тему не’ Макрос записан всю строку, а200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ПСТР(B2;1;ЕСЛИОШИБКА(ПОИСК(«(?)»;B2);999)-1) (A1;n0);2;1)-1);мил; 2);»»)&ИНДЕКС (n_4;ПСТР (ТЕКСТ (A1;n0);9;1)*И (ПСТРSmileyDimitr: по форуму полазил,Функция ReplaceFormat:=False Dim cell символ. в ячейке.так что вас коды без пробелов. сделать из а1234567890 в начале каждой удаляйте!! 14.10.2011 (S) ПОИСК вернет #ЗНАЧ,_Boroda_ (ТЕКСТ (A1;n0);4;1)+1)&ИНДЕКС (n0x;ПСТР (ТЕКСТ (A1;n0);8;1)-1);тыс; 2);»»)&ИНДЕКС: #5 и #3,: vikttur, Smiley, Не но нашел толькоTRIM As Range ‘переменнаяОбработка всего листаArkaIIIa интересует — символы Требуется: после 3й, замену типа: а123 ячейки(если такая комбинацияслэн
Удаление последних символов в ячейке при нескольких условиях (Формулы/Formulas)
’ тогда
: Если откр. скобка (ТЕКСТ (A1;n0);5;1)+1;ПСТР (ТЕКСТ (n_4;ПСТР (ТЕКСТ (A1;n0);10;1)+1)&ИНДЕКС вроде бы, рабочие. получается:( как это сделать
(СЖПРОБЕЛЫ) возвращает строку для перебора ячеек по всем столбцам: или числа? 7й, 14й и
на пусто? Если есть). Пробовал заменой: если именно в’ Сочетание клавиш:Код200?’200px’:»+(this.scrollHeight+5)+’px’);»>ЕСЛИОШИБКА(ПОИСК(«(?)»;B2)-1;999)вернет 999.
бывает только одна,
(A1;n0);6;1)+1)&ЕСЛИ (-ПСТР (ТЕКСТ (n0x;ПСТР (ТЕКСТ (A1;n0);11;1)+1;ПСТРvikttur
Загрузил пример, во для впереди стоящих «Excel Easy» (без Dim r As с данными.китин
kidlena 17 цифр вставить
катит то как
— но эти этом дело, то Ctrl+e999 — это
то так можно
(A1;n0);4;3);»миллион»&ВПР (ПСТР (ТЕКСТ (ТЕКСТ (A1;n0);12;1)+1));»z»;» «)&ЕСЛИ: =ЛЕВБ(ТЕКСТ(A2;»000000»);5) втором столбце проставил символов.
лишнего пробела).
Range ‘переменная для
Если возможно прошуРепу это я
: День добрый. Имеется
пробелы. Это можно вставить енту букву три цифры вылетают
можно вручную -’
количество возвращаемых символов200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЛЕВБ(B2;ПОИСК(«(«;B2&»(«)-1) (A1;n0);6;1)*И (ПСТР (ТЕКСТ (ОТБР (ТЕКСТ (A1;n0));»»;»Ноль
Dimitr вручную.Michael_SЯчейка диапазона используемых ячеек прописать комментарии по
случайно плюсанул, ткнул ячейка типа *** без ВБА? в ячейки первой? и в середине
ctrl+h заменить WWActiveCell.FormulaR1C1 = «Cодержимое
с запасом (надеемся,Если конструкций (*) (A1;n0);5;1)-1);мил; 2);»»)&ИНДЕКС (n_4;ПСТР «)&») рубл»&ВПР (ОСТАТ: vikttur , вотСергей: Для разовой работыA1 Set r = формулам для последующего вместо «цитата» :-)
12458 Мама, илиSerge
Владимир
и в конце на W верхней ячейк» что строк с может быть много (ТЕКСТ (A1;n0);7;1)+1)&ИНДЕКС (n1x;ПСТР
(МАКС (ОСТАТ (ПСТР
это человечно! Заработало!: =ТЕКСТ(ПСТР(A2;1;ДЛСТР(A2)-1);»00000″) можно формулу массивана следующем рисунке ActiveSheet.UsedRange ‘Все используемые самостоятельного изменения текстаArkaIIIa
*** 45684 Папа.: =ЗАМЕНИТЬ(A1;3;1;» «): Реально. При этом
и в начале,Serge
Range(«E2»).Select длиной больше 999 и удалять нужно (ТЕКСТ (A1;n0);8;1)+1;ПСТР (ТЕКСТ (ТЕКСТ (A1;n0);11;2)-11;100);9);10);{0;»ь «:1;»я Большое человеческое Вам!vikttur
200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЛЕВСИМВ(A1;МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК((СТРОКА($1:$10)-1)&»»;A1));ПОИСК((СТРОКА($1:$10)-1)&»»;A1)))-2) содержит непечатный символ. ячейки For Each
excelworld.ru
Макрос чтобы во всех ячейках столбца удалить последний символ
или условий.: Как удалить первые=ЗАМЕНИТЬ(A1;7;1;» «) заменится не только а надо только: Ctrl+H найти W,End Sub символов у нас только последнюю, то (A1;n0);9;1)+1)&ЕСЛИ (-ПСТР (ТЕКСТ «:4;»ей «};2)&ПРАВСИМВ (ТЕКСТFreedoms: =ТЕКСТ(ЛЕВБ(A2;4);»00000″)AlexMПримечание: cell In r.CellsЗаранее благодарен.kidlena 10 символов в=ЗАМЕНИТЬ(A1;14;1;» «) та комбинация, что в начале!!! заменить пустоАктивной ячейке нужно
нет)
так
(A1;n0);7;3);ВПР (ПСТР (ТЕКСТ
(A1;n0);2)&» копе»&ВПР (ОСТАТ
: =ЛЕВСИМВ (A2; ДЛСТРОпять не то?
: Можно еще так
Функция ‘Если один символ
ViterAlex
Если уверены, что ячейке?
=ЗАМЕНИТЬ(A1;17;1;» «)
впереди стоит, но
Миккиfischerspooner не присваивать текст,Вместо 999 можноКод200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЛЕВБ(B2;ДЛСТР(B2)-3*(КОДСИМВ(ПРАВБ(B2;3))=40)) (A1;n0);9;1)*И (ПСТР (ТЕКСТ
(МАКС (ОСТАТ (ПРАВСИМВ (A2)-2)Удаление последних двух Как у Вас200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЛЕВСИМВ(A1;ПОИСКПОЗ(1;ИНДЕКС(—ЕЧИСЛО(—ПСТР(A1;СТРОКА($1:$99);1)););0)-2)CLEAN справа равен «,»: Sub test() ‘Поиск везде нужно убратькитинHeadin и везде, где: Можно так. удаляем: Вручную нельзя, таблица а явно указать написатьКод200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЛЕВБ(B2;ДЛСТР(B2)-3*(ПСТР(B2;ДЛСТР(B2)-2;1)=»(«)) (A1;n0);8;1)-1);тыс; 2);»»)&ИНДЕКС (n_4;ПСТР (ТЕКСТ (A1;n0);2)-11;100);9);10);{0;»йка»:1;»йки»:4;»ек»};2);» )»;»)»));ДЛСТР
знаков из строки из 11005 получилосьили формула массива(ПЕЧСИМВ) удаляет этот
If Right(cell.Value, 1)
и замена Cells.Replace
заданное кол-во символов
: используйте ЛЕВСИМВОЛ и: =ЗАМЕНИТЬ… не прокатывает встретится. Правка -
CyberForum.ru
как удалить опред. символ в ячейке Excel, содержащей текст
«123» оч.большая, как с нажатие ентера, аДЛСТР(B3)
Manyasha (ТЕКСТ (A1;n0);10;1)+1)&ИНДЕКС (n0x;ПСТР
(ПОДСТАВИТЬ (ТЕКСТ (ОТБР в ячейке A2
01111?Code200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЛЕВСИМВ(A1;ПОИСКПОЗ(1;—ЕЧИСЛО(—ПСТР(A1;СТРОКА($1:$99);1));0)-2)
непечатный символ. Непечатные = «,» Then What:=» «, Replacement:=»
(20): ПОДСТАВИТЬ. — функция ЗАМЕНЯЕТ Заменить..lav-ich помощью формулы??
нажатие BACKSPAСE вообщеКак-то так, надуюсь: еще вариант:
(ТЕКСТ (A1;n0);11;1)+1;ПСТР (ТЕКСТ (A1;0);»# ##0_ «) (Витамин)Dimitr
RAN символы могут появится, ‘замена значения ячейки «, LookAt:=xlPart, SearchOrder200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ПРАВСИМВ(A3;ДЛСТР(A3)-20)
а для начала цифру, а нужноGuest: Не, так незя,слэн проигнорировано. Как победить? понятно
200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ПСТР(B2;1;ДЛСТР(B2)-3*ЕЧИСЛО(ПОИСК(«(?)»;ПРАВБ(B2;3)))) (A1;n0);12;1)+1));»z»;» «)&ЕСЛИ (ОТБР & «(» &=ПРАВСИМВ (A3; ДЛСТР: Сергей, Ну посмотрел
: А можно без например, после импортирования на то же _ :=xlByRows, MatchCase:=False,Если везде в почитайте ПРАВИЛА!!! ВСТАВИТЬ пробел. Вот:: Владимир
так как комбинация: пока не понимаюYurii_74
DementЛюбознатель (ТЕКСТ (A1;n0));»»;»Ноль «)&») ПОДСТАВИТЬ (ПРОПНАЧ (ИНДЕКС
(A3)-8)Удаление первых 8 — вручную сделал формул и макросов. текста из других значение, но без SearchFormat:=False, ReplaceFormat:=False Cells.Replace начале идет «автошина»:вот не первый 16305033400702003310 Нужно:163 0503Реально. При этом такая есть и почему нельзя -: Sub Delete_last_symbol_in_column() Dim: Здравствуйте. У меня: Manyasha, да, скобки рубл»&ВПР (ОСТАТ (МАКС (n_4;ПСТР (ТЕКСТ (A1;n0);1;1)+1)&ИНДЕКС знаков из строки zip code, т.к.
Как, см. здесь приложений. последнего символа cell.Value
What:=», ,», Replacement:=»,»,Код200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ПРАВСИМВ(A3;ДЛСТР(A3)-ПОИСК(«автошина»;A3;1)+1) же день на 3400702 003 310 заменится не только в середине и заменить все - i, end_row, column_
количество символов в только в конце. (ОСТАТ (ПСТР (ТЕКСТ (n0x;ПСТР (ТЕКСТ (A1;n0);2;1)+1;ПСТР
в ячейке A3 нужны 5 значные
AlexMУрок подготовлен для Вас = Left(cell.Value, Len(cell.Value) LookAt:=xlPart, SearchOrder _
Если впереди не сайте.и даже вHeadin та комбинация, что в конце, а не поможет?
As Integer column_ скобках различается в
Спасибо, то, что (A1;n0);11;2)-11;100);9);10);{0;»ь «:1;»я «:4;»ей (ТЕКСТ (A1;n0);3;1)+1)&ЕСЛИ (-ПСТР (B1) значения чтобы не: А можно формулой, командой сайта office-guru.ru — 1) End :=xlByRows, MatchCase:=False, SearchFormat:=False,
обязательно «автошина»: репе +3 стоит…..
: Вот что помогло: впереди стоит, но надо удалить толькоfischerspooner = ActiveCell.Column end_row каждой строке и надо. «};2)&ПРАВСИМВ (ТЕКСТ (A1;n0);2)&» (ТЕКСТ (A1;n0);1;3);»миллиард»&ВПР (ПСТРконкретно в вашем потерять первые нули.
но короче вИсточник: http://www.excel-easy.com/examples/remove-unwanted-characters.html If If Left(cell.Value, ReplaceFormat:=False Dim cellКод200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ПРАВСИМВ(СЖПРОБЕЛЫ(A3);ДЛСТР(СЖПРОБЕЛЫ(A3))-ПОИСК(» «;СЖПРОБЕЛЫ(A3);1+ПОИСК(» «;СЖПРОБЕЛЫ(A3);1)))kidlena =ЗАМЕНИТЬ(C8;4;;» «) - и везде, где
в начале!!: нет менять WW
= ActiveCell.SpecialCells(xlLastCell).Row For их тоже надоПоясните, пожалуйста, только, копе»&ВПР (ОСТАТ (МАКС (ТЕКСТ (A1;n0);3;1)*И (ПСТР случае =ЛЕВСИМВ (ячейкапо идее мне
два раза, чемПеревел: Антон Андронов 1) = « As Range ‘переменнаякитин: Не совсем поняла, БЕЗ единички. Спасибо встретится. Правка -Микки на W не i = 1 удалить. Как быть? что значит в
(ОСТАТ (ПРАВСИМВ (ТЕКСТ (ТЕКСТ (A1;n0);2;1)-1);мил; 2);»»)&ИНДЕКС ; ДЛСТР (ячейка) текстовый формат тоже предложенная выше массивнаяАвтор: Антон Андронов
» Then ‘замена для перебора ячеек: ну или так,к как сделать, и
за наводку!!! Serge Заменить..{/post}{/quote}: моя формула и
нужно. Нужно просто To end_row Ifкитин формуле 999)-1, чтобы (A1;n0);2)-11;100);9);10);{0;»йка»:1;»йки»:4;»ек»};2);» )»;»)»)) (n_4;ПСТР (ТЕКСТ (A1;n0);4;1)+1)&ИНДЕКС -11) подойдет200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЗАМЕНИТЬ(A1;ПОИСК(» ??-«;A1);99;)mrSED значения ячейки на Dim r As
примеру что Вас так
007 — респект!
Поскольку в ячейках
удаляет только в
удалить все символы Len(Cells(i, column_)) >: создать тему и понять смысл.Любознатель (n0x;ПСТР (ТЕКСТ (A1;n0);5;1)+1;ПСТРAmiko takahasi
СергейmrSED: Здравствуйте, уважаемые! Столкнулся то же значение, Range ‘переменная для200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ПОДСТАВИТЬ(A3;ЛЕВБ(A3;20);»»)
разозлило тоже неlav-ich одни цифры, а начале!!! попробуйте W во всех 0 Then Cells(i, приложить примерЛюбознатель: Добрый день! (ТЕКСТ (A1;n0);6;1)+1)&ЕСЛИ (-ПСТР
: поставь курсор с: Извиняйте все ячейки
: Ого, сколько вариантов с такой проблемой.
но без первого диапазона используемых ячеекkidlena поняла.: Всем РЕСПЕКТ-ИЩЕЕЕ!!! Всё
если букву вставитьВладимир ячейках столбца. column_) = Mid(Cells(i,Alex0070
: _Boroda_, Manyasha, спасибоПодскажите, пожалуйста, как (ТЕКСТ (A1;n0);4;3);»миллион»&ВПР (ПСТР ячейку и нажимай
не глянул ) Спасибо большое Есть хлс документ
символа cell.Value = Set r =: Спасибо огромное!!!!
planetaexcel.ru
Удаление заданного количества символов в начале ячейки (Формулы/Formulas)
китин прокатило с заменой. в НАЧАЛЕ каждой: =ПСТР(A1;4;НАЙТИ(ЛЕВСИМВ(A1;2);A1)+10)Serge column_), 1, Len(Cells(i,: Excel 2003. Стоит большое, все формулы
прописать все значения, (ТЕКСТ (A1;n0);6;1)*И (ПСТР кнопку удаления
Smiley за помощь, буду
в котором около Right(cell.Value, Len(cell.Value) - ActiveSheet.UsedRange ‘Все используемыеkrosav4ig
: 3. Кратко, но А особенно Serge ячейки, то иlav-ich: Выделить весь лист. column_)) — 1)
задача: во всех работают. Записала все которые необходимо удалить (ТЕКСТ (A1;n0);5;1)-1);мил; 2);»»)&ИНДЕКСВасилий денисов: Так проставьте в пробовать! 8 тысяч позиций. 1) End If ячейки For Each: ёмко опишите задачу 007(вот только если последовательность типа а543
: CCори, Слона я Ctrl+H найти W, End If Next ячейках столбца необходимо себе — буду если они встретятся (n_4;ПСТР (ТЕКСТ (A1;n0);7;1)+1)&ИНДЕКС: Замечальна язамена надстройки. ячейках нормальные текстовыеDimitr все это расположено Next End Sub
cell In r.Cells200?’200px’:»+(this.scrollHeight+5)+’px’);»>=ЗАМЕНИТЬ(A3;1;20;) в теле поста. бы намекнул, что
будет только в и не заметил!!! заменить пусто. Два
End SubВстаёте на удалить последний символ. в них разбираться.
в конце текста (n1x;ПСТР (ТЕКСТ (A1;n0);8;1)+1;ПСТР Я прикрутил к
значения. Какие они: Добрый день. в одном столбце.вотViterAlex
'Если один символ
olegeriusВСЕГДА прикладывайте файл-пример
формат ячеек должен
начале и её Спасибо большое!!!!!
раза. Три секунды.
любую ячейку требуемого Выделяю верхнюю ячейкуManyasha ячейки.
(ТЕКСТ (A1;n0);9;1)+1)&ЕСЛИ (-ПСТР ней условие не
должны быть?Поиск не дал часть такого документа
excelworld.ru
Удаление символов в ячейке ексель
: Пробелы в начале справа равен «,»
: Приветствую.
, кроме тех случаев, быть — общим, тупо заменить, а
lav-ichслэн столбца, запускаете макрос, и записываю макрос::Т.е. необходимо удалить
(ТЕКСТ (A1;n0);7;3);ВПР (ПСТР писать копейки еслиDimitr результатов.Абакулов Кирилл Александрович
и конце строки If Right(cell.Value, 1)Опыта нет.
когда вопрос носит то было бы потом енту букву: Да. Требовалось: Первые: пять же никто получаете результат.
F2 (переход кЛюбознатель последние три знака,
(ТЕКСТ (A1;n0);9;1)*И (ПСТР число целое.: Smiley, проставил, посмотритеДано: ячейка в 16-06-1983 ——
можно (и нужно)
= «,» ThenТребуется обработать файл общий характер и ваще СУПЕР)!!! тоже подчистить. КАК три символа надо не мешает -То же самое правке в строке, на примере 1-й если встречается в (ТЕКСТ (A1;n0);8;1)-1);тыс; 2);»»)&ИНДЕКС=ЕСЛИ (A1=ЦЕЛОЕ (A1);ЛЕВСИМВ пожалуйста формате почтовый индексАббасова Егане Зульфигар-Кызы убирать функцией Trim ‘замена значения ячейки ексель — 2003 не касается конкретноvikttur ЕЁ ВСТАВИТЬ В было просматривать только заменить W на можно получить без формул), затем END строки: конце такой текст: (n_4;ПСТР (ТЕКСТ (A1;n0);10;1)+1)&ИНДЕКС ((ПОДСТАВИТЬ (ТЕКСТ (ОТБРDimitr (6 знаков) в
18-04-1970 ——olegerius
на то же с помощью макроса. Вашего файла. Темы
: Куча мала :) весь СТОЛБЕЦ ПЕРВОЙ??? на полное совпадение!! пусто.. т.е. просто макросов с помощью (перевод курсора вПОИСК(«(?)»;B2) (1), (2), (3) (n0x;ПСТР (ТЕКСТ (A1;n0);11;1)+1;ПСТР (A1;0);»# ##0_ «): Вот это реально ней число.Аббасова Татьяна Владимировна: Прошу прощения за значение, но без1. Замена комбинаций касающиеся конкретного файла,=ЗАМЕНИТЬ(ЗАМЕНИТЬ(ЗАМЕНИТЬ(ЗАМЕНИТЬ(A1;18;;» «);15;;» «);8;;»Serge Спасибо!!!! не писать ничего формулы конец строки) ,- вернет 10 и т.д. (ТЕКСТ (A1;n0);12;1)+1));»z»;» «)&ЕСЛИ & «(» & работает! у меняТребуется: получить такую 24-07-1963 лохизм — пример последнего символа cell.Value символов — в но без приложенного «);4;;» «): Ламерски: в другомlav-ich в строке заменить=ПСТР(A1;1;ДЛСТР(A1)-1)
BACKSPAСE (Удалить символ)А третий аргументЯ применила такую (ОТБР (ТЕКСТ (A1;n0));»»;»Ноль ПОДСТАВИТЬ (ПРОПНАЧ (ИНДЕКС
там ошибка сначала же ячейку, ноАбдикахаров Бахромжон Анваржонович нужен с условием.
CyberForum.ru
= Left(cell.Value, Len(cell.Value)