Сжать пробел excel на английском

русском	английском
СЖПРОБЕЛЫ	TRIM

Описание

Удаляет из текста все пробелы, за исключением одиночных пробелов между словами. Функция СЖПРОБЕЛЫ используется для обработки текстов, полученных из других прикладных программ, если эти тексты могут содержать лишние пробелы.

 Важно.   Функция СЖПРОБЕЛЫ предназначена для удаления из текста знаков пробела 7-разрядного кода ASCII (значение 32). В наборе знаков Юникода существует дополнительный знак пробела, который называется знаком неразрывного пробела и имеет десятичное значение 160. Этот знак обычно используется на веб-страницах как сущность HTML  . Сама по себе функция СЖПРОБЕЛЫ не удаляет этот знак неразрывного пробела. Пример синтаксиса, позволяющего удалить из текста оба знака пробела, см. в разделе Удаление пробелов и непечатаемых знаков из текста.

Дополнительная информация (источник)

Функция СЖПРОБЕЛЫ() в MS EXCEL

​Смотрите также​For Each rCell​End With​: Вообще-то автор давал​Dim v As​ и двойных пробелов​Света, вот такой​ путь используют, преимущественно,​ D3. В качестве​. Поэтому о применении​ а значит, вставка​

Синтаксис функции

​Синтаксис этого оператора довольно​​ не найдено.​

​ сообщение о том,​​ документ. Особенно их​ примере заголовок отчёта​

Пример

​SUBSTITUTE​Функция СЖПРОБЕЛЫ(), английский вариант​ In rRange​End Sub{/post}{/quote}​ нормальную строку, с​ Range​Sub TrimSpaces()​ макрос поможет:​ для удаления лишних​ аргумента введем ячейку​

Символ неразрывного пробела

​ конкретного способа пользователь​ произойдет некорректно. Поэтому​ прост и имеет​Разделения между разрядами будут​ что искомые данные​ не нужно допускать​ введён в ячейке​(ПОДСТАВИТЬ). Как и​ TRIM(), удаляет из​If rCell.EntireRow.Height >​Улет! Я бы​​ множественными пробелами внутри,​​For Each v​Dim v As​’ Удаление крайних​ пробелов в составе​ B3, в которой​
​ должен принимать решение​
​ нам нужно произвести​ всего один аргумент:​ удалены, а формулы​ не найдены.​ в таблицах, которые​ C11, которой присвоено​ функция​ текста все пробелы,​ 0 _​ не додумался.:-(​ но движок форума​​ In ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants)​​ Range​

​ и двойных пробелов​ чисел.​ значится наименование игрушки.​ самостоятельно с учетом​ только копирование значений.​=СЖПРОБЕЛЫ(текст)​ начнут вычисляться корректно.​Таким образом, мы избавились​ предоставляются руководству или​ имя​REPLACE​ за исключением одиночных​And Not (rCell.HasFormula)​Alex_ST​ при выводе обрезал.​v.Value = Trim(v)​

excel2.ru

30 функций Excel за 30 дней: ПОДСТАВИТЬ (SUBSTITUTE)

​For Each v​​Sub TrimSpaces()​света​​Теперь протянем функцию до​​ ситуации.​​Выделяем диапазон с преобразованными​В качестве аргумента​Но бывают ситуации, когда​ от лишних двойных​ общественности. Но даже,​​RptTitle​​(ЗАМЕНИТЬ), она заменяет​ пробелов между словами.​ _​​: А у меня​​ Но я при​While InStr(1, v,​ In ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants)​​Dim v As​​: подскажите, пожалуйста, код,​ 14 строки и​

​Автор: Максим Тютюшев​ значениями. Жмем на​«Текст»​​ вы четко видите,​​ пробелов между словами​ если вы собираетесь​​. Символы​​ старый текст на​ Функция СЖПРОБЕЛЫ() используется​And Not IsDate(rCell)​ что-то так работать​ цитировании их видел​ » «, vbTextCompare)​

​v.Value = Trim(v)​ Range​ который будет убирать​ увидим, что тексты​​Лишние пробелы в тексте​​ кнопку​​может выступать, как​​ что на листе​ в документе.​ использовать данные только​

​yyy​ новый, а также​ для обработки текстов,​​ Then​​ не хочет…​ — можете попробовать​ > 0​While InStr(1, v,​For Each v​ лишние пробелы во​

Функция 27: SUBSTITUTE (ПОДСТАВИТЬ)

​ действительно выровнялись, потому​​ замечают не все.​​«Копировать»​ непосредственно текстовое выражение,​ разряды разделены в​Урок:​ в личных целях,​в тексте заголовка​ может сделать многочисленные​ полученных из других​rCell.Value = Application.WorksheetFunction.Trim(rCell.Value)​

Как можно использовать функцию SUBSTITUTE (ПОДСТАВИТЬ)?

​Давно написанный для​​ цитнуть (интересный​​v.Value = Replace(v,​ » «, vbTextCompare)​ In ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants)​ всех ячейках листа.​ что пробелы удалились.​

• ​ И не для​, расположенную на ленте​
• ​ так и ссылка​
• ​ числах пробелами, а​

Синтаксис SUBSTITUTE (ПОДСТАВИТЬ)

​Замена символов в Excel​​ лишние пробелы способствуют​​ будут заменены на​ замены одинакового текста​

​ прикладных программ, если​
​End If​

• ​ себя макрос:​​ эффект — в​ » «, «​ > 0​v.Value = Trim(v)​
• ​ Вот, например, в​​ Проверим это наверняка,​ всех это, в​
• ​ во вкладке​​ на ячейку в​ поиск не дает​
• ​В некоторых случаях между​​ увеличению объема документа,​ название региона, выбранное​ в строке.​ эти тексты могут​

Ловушки SUBSTITUTE (ПОДСТАВИТЬ)

• ​Next​​Sub Trim_with_Cycle() ‘​​ цитате есть пробелы,​ «)​v.Value = Replace(v,​While InStr(1, v,​ excel есть функция​ изменив диапазон в​​ общем-то, важно. Но​​«Главная»​
• ​ котором оно содержится.​ результатов. Это говорит​ разрядами в числах​​ что является негативным​​ в ячейке D13.​

Пример 1: Изменяем название региона в заголовке отчёта

​Как показывает практика, в​​ содержать лишние пробелы.​​Application.ScreenUpdating = True​ применить функцию СЖПРОБЕЛЫ​ при выводе -​Wend​ » «, «​ » «, vbTextCompare)​ «сжпробелы», но она​ команде СУММЕСЛИ. Вместо​ в Excel это​в группе инструментов​​ Для нашего случая​​ о том, что​​ устанавливаются пробелы. Это​​ фактором. Кроме того,​=SUBSTITUTE(RptTitle,»yyy»,D13)​ некоторых ситуациях быстрее​СЖПРОБЕЛЫтекст​

​End Sub​
​ к ячейкам выделенного​

Пример 2: Удаляем непечатаемые символы

​ нет).​Next​ «)​ > 0​ оставляет по одному​ B3:B14 пропишем D3:D14​ может обернуться серьезной​«Буфер обмена»​ как раз последний​ в данном случае​ не ошибка, просто​ наличие подобных лишних​​=ПОДСТАВИТЬ(RptTitle;»yyy»;D13)​​ и проще использовать​)​

​А вот как​ диапазона​​Andrey​​End Sub​Wend​v.Value = Replace(v,​ пробелу между словами​​ и посмотрим результат.​​ проблемой, потому что​. Как альтернативный вариант​

​ вариант и будет​
​ разделение было выполнено​

Пример 3: Заменяем последний символ пробела

​ для визуального восприятия​ элементов затрудняет поиск​При копировании данных с​ команды​​Текст​​ проверить не время​Dim rRange As​: Объесняю немного подробнее,что​—​Next​ » «, «​ и убирает пробелы​ Теперь плюшевых зайцев​

​ при выполнении команд​​ можно после выделения​​ рассматриваться.​ путем форматирования. Такой​ больших чисел именно​ по файлу, применение​​ веб-сайта, в тексте​​Find​  — текстовая строка, из​ ли в ячеёке?​ Range, rCell As​​ хочется получить..​​ZVI{/post}{/quote}​End Sub​ «)​ перед первой и​ действительно 5, медведей​ программа просто не​

​ набрать сочетание клавиш​
​Выделяем ячейку, расположенную параллельно​

​ вариант пробела не​​ такой вид написания​​ фильтров, использование сортировки​ могут оказаться лишние​/​ которого удаляются пробелы.​

​Свойство IsDate(rCell) вернёт​
​ Range​

​Есть диапазон ячеек,​—​—​Wend​ последней буквами. А​

​ – 6 и​ будет учитывать ячейки​
​Ctrl+C​ столбцу или строке,​

​ повлияет на корректность​ более удобен. Но,​
​ и некоторых других​
​ символы пробелов. Текст​

​Replace​

office-guru.ru

Удаление лишних пробелов в Microsoft Excel

​Формула =СЖПРОБЕЛЫ(»         Доход       за​ ИСТИНУ при любом​Application.ScreenUpdating = False​ в котором есть​Так как движок​ZVI{/post}{/quote}​Next​ мне надо, чтобы​ т.п. Получается, символы​ с дополнительными пробелами.​.​ где следует убрать​ отображения формул, но​ все-таки далеко не​ инструментов. Давайте выясним,​ может содержать, как​(Найти/Заменить), когда необходимо​ первый     квартал   «)​ из форматов даты​Set rRange =​ ячейки с содержанием​ этого форума, похоже,​а подскажите как​

​End Sub​ это делалось в​

​ табуляции играют важную​​Как удалить лишние пробелы​Выделяем исходный диапазон данных.​

Технология удаления пробелов

​ пробелы. Кликаем по​ в то же​ всегда это приемлемо.​ какими способами их​ обычные пробелы (символ​ сделать замену чувствительную​ вернет «Доход за​ в ячейке.​ Intersect(Selection, ActiveSheet.UsedRange)​ «лишних» пробелов.​ сам удалает двойные​ сделать что бы​—​

Способ 1: использование инструмента «Заменить»

​ VBA, при вызове​ роль, и их​ в Excel в​ Кликаем по выделению​​ кнопке​​ время некоторые пользователи​

1. ​ Например, если ячейка​​ можно быстро найти​​ 32), так и​​ к регистру.​​ первый квартал», т.е.​А как быть​​For Each rCell​​Вот нужен макрос,​ пробелы (сразу после​ данный макрос запускался​​ZVI{/post}{/quote}​​ макроса. Вставлять лишние​ нужно подчищать.​ автоматическом режиме? Чтобы​ правой кнопкой мыши.​​«Вставить функцию»​​ считают, что без​

   

2. ​ не отформатирована под​ и убрать.​ не неразрывные (символ​Итак, давайте внимательно изучим​​ удалены все пробелы​​ с разными форматами​​ In rRange​​ который бы «убивал»​ v в двойных​ автоматически при вводе​​зависает документ :'(​​ столбцы в excel​Использование функции СЖПРОБЕЛЫ вместе​​ не испортить зрение,​​ В контекстном меню​, расположенную слева от​ него таблица будет​​ числовой формат, добавление​​Скачать последнюю версию​

   

3. ​ 160). Когда Вы​ информацию и примеры​ за исключением одиночных​ времени? Ведь аналогичного​rCell.Value = Application.WorksheetFunction.Trim(rCell.Value)​ лишние пробелы (​​ кавычках должно быть​​ данных в определенную​

   

4. ​ZVI​​ мне нельзя, т.к.​​ с другими функциями​ вглядываясь в каждую​ в блоке​ строки формул.​ выглядеть лучше. Давайте​ разделителя может негативно​ Excel​ сделаете попытку удалить​ по​ пробелов между словами.​

​ свойства IsTime(rCell) -​Next​ по подобию результата​ 2 пробела), то​

​ область?​​: —​

Способ 2: удаление пробелов между разрядами

​ поедут все формулы.​ расширяет возможности пользователя.​ ячейку и убирая​«Параметры вставки»​Запускается окно Мастера функций.​ рассмотрим, как убрать​ отразиться на корректности​Урок:​ их, то обнаружите,​SUBSTITUTE​ Также удалены пробелы​ в VBA нет…​Application.ScreenUpdating = True​ действия функции Excel​ прилагаю файл с​KuklP​Света, вот такой​ Хотелось бы, чтобы​ Логично, что она​ лишние доступы клавишей​выбираем пункт​ В категории​​ такой вариант разделения.​​ вычислений в формулах.​

1. ​Удаление больших пробелов в​ что функция​(ПОДСТАВИТЬ). Если у​ перед первым и​Юрий М​End Sub​ = СЖПРОБЕЛЫ() )​ функцией​: Как вариант, немного​ макрос поможет:​ при запуске макроса,​ будет использоваться вместе​ Backspace, можно воспользоваться​«Значения»​«Полный алфавитный перечень»​Так как пробелы были​​ Поэтому актуальным становится​​ Microsoft Word​​TRIM​​ Вас есть другие​ после последнего слова.​​: Но ведь время​​работает отлично, а​До макроса было​​—​​ изменил макрос ZVI:​

   

2. ​’ Удаление крайних​​ данные просто заменялись​​ с теми функциями,​​ специальной функцией –​​. Он изображен в​или​ сделаны с помощью​ вопрос об удалении​Сразу нужно сказать, что​​(СЖПРОБЕЛЫ) не способна​​ сведения или примеры​Функция СЖПРОБЕЛЫ() предназначена для​​ — это дата.​​ точно такой же,​ :​ZVI{/post}{/quote}​Sub TrimSpaces()​ и двойных пробелов​ темиже, только без​ которые исследуют массивы​ СЖПРОБЕЛЫ.​ виде квадратной пиктограммы​«Текстовые»​ инструментов форматирования, то​ таких разделителей. Эту​ пробелы в Excel​ удалить неразрывные пробелы.​ использования этой функции,​​ удаления из текста​​Alex_ST​

   

3. ​ но по методу,​»Вася__Петя____Коля»​эта штука хороша​ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants) = _​Sub TrimSpaces()​ лишних пробелов.​ и возвращают данные.​Да, проговорить название команды​ с цифрами внутри.​ищем элемент​

​ только при помощи​ задачу можно выполнить​ могут быть разного​

Способ 3: удаление разделителей между разрядами путем форматирования

​К счастью, Вы можете​ пожалуйста, делитесь ими​ только знаков пробела​: Это Вы так​ предложенному KL (все​После макроса :​ когда длинна строки​Application.Trim(ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants))​Dim v As​Напишите, пожалуйста, код​ В частности, это​ может оказаться непросто.​Как видим, после вышеописанных​«СЖПРОБЕЛЫ»​ этих же инструментов​ при помощи все​ типа. Это могут​ использовать функцию​ в комментариях.​ (код символа 32).​ думаете, а Ёксель​

​ ячейки диапазона сразу,​»Вася_Петя_Коля»​Михаил С.​End Sub​ Range​ для столбца А.​

1. ​ функции НАЙТИ, ЛЕВСИМВ,​ Но вот понять​ действий значения с​. Выделяем его и​ их можно убрать.​​ того же инструмента​​ быть пробелы между​

   
2. ​SUBSTITUTE​Функция​​ Страницы в интернете​​ — нет.​ а не циклом):​»_» — это​: Нет, сегодня «Выпускник-2011″​Юрий М​For Each v​Ольчик​​ ПРАВСИМВ и др.​​ ее синтаксис и​ лишними пробелами были​​ жмем на кнопку​​Выделяем диапазон чисел с​«Найти и заменить»​ словами, пробел в​(ПОДСТАВИТЬ), чтобы заменить​​SUBSTITUTE​​ обычно используют и​Попробуйте ввести в​Sub Trim_with_Range() ‘​ пробелы (т.к. двойные​ :)​: Сегодня вечер «Выпускник-2008»?​​ In ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants)​​: можно записать макрос.​

   

3. ​ На практике оказывается,​ принцип работы очень​ заменены идентичными данными​«OK»​

​ разделителями. Кликаем по​​.​

Способ 4: удаление пробелов с помощью функции

​ начале значения и​​ каждый неразрывный пробел​​(ПОДСТАВИТЬ) заменяет старый​ другой знак пробела,​ одну ячейку, например,​ применить функцию СЖПРОБЕЛЫ​ пробелы движек форума​Andrey​Казанский​v.Value = Trim(v)​Range(«B1»).Select​ что чаще всего​ легко. Если начать​​ без них. То​​.​

​ выделению правой кнопкой​Выделяем столбец или диапазон,​ в конце, разделители​ на обычный, а​ текст на новый​ который называется знаком​ 1.1.10 (автоматически преобразуется​ к ячейкам выделенного​ «съедает»)​: как на VBA​: > Как вариант,​While InStr(1, v,​

​ActiveCell.FormulaR1C1 = «=TRIM(RC[-1])»​ СЖПРОБЕЛЫ используется вместе​ вводить команду, то​

​ есть, поставленная задача​

​Открывается окошко аргументов функции.​​ мыши. В появившемся​​ в котором нужно​ между разрядами числовых​ затем, используя функцию​ текст внутри текстовой​ неразрывного пробела и​ после ввода в​ диапазона​Guest​ будет выглядить функция​

1. ​ немного изменил макрос​ » «, vbTextCompare)​Range(«B1»).Select​ с ВПР.​ подсветится следующее: =СЖПРОБЕЛЫ(текст).​​ выполнена. Теперь можно​​ К сожалению, данная​ меню выбираем пункт​

   

2. ​ удалить разделители между​ выражений и т.д.​​TRIM​​ строки. Функция заменит​​ имеет код 160​​ дату 01.01.2010), а​​Dim rRange As​​: Афтар, выдели диапазон​ СЖПРОБЕЛЫ() ?​​ ZVI:​​ > 0​

   
3. ​Selection.AutoFill Destination:=Range(«B1:B13»), Type:=xlFillDefault​Рассмотрим на примере той​ Т.е. в скобках​ удалить транзитную область,​ функция не предусматривает​«Формат ячеек…»​ цифрами. Этот момент​ Соответственно и алгоритм​(СЖПРОБЕЛЫ), удалить все​ все повторения старого​ (​ в другую -​ Range​ ячеек на листе​Haken​​> Sub TrimSpaces()​​v.Value = Replace(v,​

   

4. ​Range(«B1:B13″).Select​ же таблицы. Задача:​ нужно всего лишь​ которая была использована​ использования в качестве​.​ очень важен, так​ их устранения в​ лишние пробелы.​ текста, пока не​)​ 10:00 (преобразуется после​Application.ScreenUpdating = False​ и запусти этот​: Trim()​Нет, Серж, это​ » «, «​слэн​ проставить цену напротив​ задать ячейку (ячейки),​ для трансформации. Выделяем​ аргумента всего нужного​Происходит запуск окна форматирования.​ как если диапазон​ этих случаях различный.​=TRIM(SUBSTITUTE(B3,CHAR(160),» «))​ будет выполнено определённое​. Сама по себе​ ввода во время​Set rRange =​ код​причем и как​ работает только с​ «)​

   

5. ​: вы бы все​ каждой позиции. Справа​ в которых необходимо​ диапазон ячеек, в​ нам диапазона. Поэтому​ Переходим во вкладку​ не будет выделен,​С заменой двойных пробелов​=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(B3;СИМВОЛ(160);» «))​ условие. Она чувствительна​ функция СЖПРОБЕЛЫ() не​ 10:00:00).​ Intersect(Selection, ActiveSheet.UsedRange)​Sub DelSpaces()​ функция листа, а​ прямоугольнуми областями. Я​Wend​

   ​ же определились -​ дана вспомогательная таблица,​ удалить пробелы.​​ которых содержится формула​​ устанавливаем курсор в​«Число»​​ то инструмент уберет​​ между словами на​​Чтобы не заменять все​​ к регистру.​ удалит этот знак​А потом попробуйте​​rRange.Value = Application.WorksheetFunction.Trim(rRange.Value)​​Dim iCell As​

   

6. ​ так же есть​ на эти грабли​Next​ какие пробелы лишние,​ в которой прописана​​Примечание: функция убирает все​​СЖПРОБЕЛЫ​​ поле аргумента, а​​, в случае если​ все пробелы из​ одинарные в Экселе​

   

7. ​ вхождения текстовой строки,​Функция​ неразрывного пробела, это​ применить к ячейкам​Application.ScreenUpdating = True​ Range​ и функция VBA,​ наступил надавно:​End Sub​ а какие нет..​ цена каждой игрушки.​ лишние пробелы, за​​. Кликаем по нему​​ затем выделяем самую​ открытие произошло в​ документа, в том​ отлично справляется инструмент​​ Вы можете использовать​​SUBSTITUTE​

   

8. ​ может формула​ мой макрос из​End Sub​If MsgBox(«Удалить лишние​ если надо в​То есть надо​—​а так есть​ Теоретически мы можем​ исключением того, который​ правой кнопкой мыши.​

​ первую ячейку диапазона,​​ другом месте. Если​

​ числе и между​​«Заменить»​ аргумент​

​(ПОДСТАВИТЬ) заменяет старый​=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(A1;СИМВОЛ(160);СИМВОЛ(32)))​ предыдущего поста.​работать не хочет.​ пробелы в выделенном​ коде переменную «сжать»​ либо со всем​ZVI{/post}{/quote}​​ ф-ия replace -​​ вручную перепечатать нужные​​ ставится по умолчанию​​ В активировавшемся меню​ с которым мы​ разделение было задано​ словами, то есть,​.​instance_num​ текст новым внутри​Формула заменит все​Или просто напишите​ Говорит, что «Несоответствие​ диапазоне?», vbQuestion +​EducatedFool​ UsedRange (тогда формулы​—​ может удалить все​ нам цифры, но​​ между словами.​​ выбираем пункт​ работаем. После того,​ при помощи форматирования,​ там, где они​Находясь во вкладке​​(номер_вхождения) для указания,​​ текстовой строки. Вы​ знаки неразрывного пробела​Private Sub Worksheet_SelectionChange(ByVal​ типа» (ошибка 13)​ vbYesNo, «Чистка пробелов»)​

​: аналог функции СЖПРОБЕЛЫ​

lumpics.ru

Функция СЖПРОБЕЛЫ в Excel и примеры ее использования

​ будут преобразованы в​Так как движок​ пробелы, может только​ раз мы в​Те, кто хорошо владеет​«Очистить содержимое»​ как адрес ячейки​ то в блоке​ действительно нужны. Далее,​«Главная»​ какое из вхождений​ можете использовать её​

​ (код символа 160)​ Target As Range)​Alex_ST​ = vbNo Then​ в VBA -​ значения), либо по​ этого форума, похоже,​ «лишние», смотря как​ Excel, будем использовать​ техникой печатания, наверняка​

Синтаксис функции СЖПРОБЕЛЫ в Excel

​.​ отобразился в поле,​ параметров​ как и ранее,​, кликаем по кнопке​ нужно заменить. В​ для того, чтобы:​ знаком пробела (код​MsgBox IsDate(Target)​: Я так сразу​ Exit Sub​ не TRIM(» текст​ областям:​

​ сам удалает двойные​ использовать​ ВПР.​ недоумевают, как вообще​После этого лишние данные​

​ жмем на кнопку​«Числовые форматы»​ кликаем по кнопке​«Найти и выделить»​ следующем примере представлен​Изменять название региона в​ символа 32) с​End Sub​ и пробовал.​For Each iCell​ текст «), а​Sub TrimSpaces()​ пробелы (сразу после​

​света​

Пример использования функции СЖПРОБЕЛЫ

​Если мы протянем формулу​ могут появиться лишние​ будут убраны с​«OK»​должен быть установлен​«Найти и выделить»​, которая размещена в​ список ингредиентов для​ заголовке отчёта.​ помощью функции ПОДСТАВИТЬ(),​»Покликайте» по ячейкам​Если убрать .WorksheetFunction​ In Selection.Cells​application.WorksheetFunction.Trim(» текст текст​Dim a As​ v в двойных​: вы бы все​

​ до конца таблицы,​ пробелы. Но опытные​ листа. Если в​.​ вариант​в блоке инструментов​

​ блоке инструментов​ рецепта, где требуется​Удалить непечатаемые символы.​ а затем удаление​ и сами увидите,​ и написать просто:​iCell = Application.Trim(iCell)​ «)​ Range​ кавычках должно быть​ же определились -​ увидим следующее:​ пользователи знают, что​ таблице существуют другие​

​Как видим, содержимое ячейки​«Числовой»​«Редактирование»​«Редактирование»​ заменить только последний​

​Заменить последний символ пробела.​ начального пробела и​ что IsDate будет​rRange.Value = Application.Trim(rRange.Value)​Next​Последнюю можно также​For Each a​ 2 пробела), то​ какие пробелы лишние,​Розовым цветом мы специально​ информация для Excel​ диапазоны, которые содержат​ отобразилось в области,​. В правой части​на ленте во​на ленте. В​ символ пробела.​

СЖПРОБЕЛЫ с другими функциями

​Функция​ повторяющихся промежуточных пробелов​ True только при​то выдаётся «Ошибка,​MsgBox «Лишние пробелы​ записать как​ In ActiveSheet.UsedRange.SpecialCells(xlCellTypeConstants).Areas​ прилагаю файл с​ а какие нет..​ подсветили те позиции,​ часто копируется из​ лишние пробелы, то​ в которой находится​ окна располагаются точные​ вкладке​

​ выпадающем списке выбираем​Функция​SUBSTITUTE​ из строки в​ дате в ячейке,​ определяемая приложением или​ в указанном диапазоне​WorksheetFunction.Trim(» текст текст​a = Application.Trim(a)​ функцией​а так есть​ которые написаны с​ разных источников, которые​

​ с ними нужно​ функция, но уже​ настройки данного формата.​

​«Главная»​ пункт​LEN​(ПОДСТАВИТЬ) имеет вот​ ячейке​ а при времени​ объектом» (ошибка 1004)​ удалены!», 64, «Конец»​ «)​Next​—​

​ ф-ия replace -​ лишними пробелами. Поэтому​ могли заполняться дилетантами.​ поступить по точно​ без лишних пробелов.​ Около пункта​. В добавочном меню​«Заменить»​(ДЛСТР) в ячейке​ такой синтаксис:​А1​ — False​

Как еще можно удалить лишние пробелы в Excel?

​Dophin​End Sub​и​End Sub​ZVI​ может удалить все​ команда ВПР не​ Поэтому в тексте​

​ такому же алгоритму,​ Мы выполнили удаление​«Разделитель групп рядов ()»​ выбираем пункт​. Можно также вместо​ C3 подсчитывает количество​SUBSTITUTE(text,old_text,new_text,instance_num)​.​Юрий М​: Sub Trim_with_Range() ‘​

​и не мучай​application.Trim(» текст текст​Приложен файл, на​света​ пробелы, может только​ выдала по ним​ и встречаются опечатки​ какой был описан​ пробелов только для​

exceltable.com

сжатие пробелов в VBA

​вам просто нужно​​«Заменить»​ вышеперечисленных действий просто​ символов в ячейке​ПОДСТАВИТЬ(текст;стар_текст;нов_текст;номер_вхождения)​Кроме того, при вводе​: А вот так​ применить функцию СЖПРОБЕЛЫ​ людей по пустякам​ «)​ котором можно попробовать.​: —​ «лишние», смотря как​ результат. Чтобы исправить​ и ненужные пробелы.​ выше.​ одного элемента диапазона.​ будет снять галочку.​.​ набрать сочетание клавиш​ B3. Функция​text​ в программе MS​ корректно будет?​ к ячейкам выделенного​
​ )))​TRIM убирает пробелы​

​’ Удаление крайних​​ в начале слова,​ и посмотрим, что​

​ как пользоваться функцией​​Урок:​

​ пробел, который отделяет​​x = ActiveCell.NumberFormat​

​: Кто-нибудь помогите!​​ теперь мы протянем​ он просто впечатывал​
​ всего двух инструментов​
​ большой. Существует способ​
​Форматирование таблиц в Excel​
​ а поле​

​ дважды кликаем по​​ 2 пробела.​

​ таблицы, функция проставит​​ на то, что​«Найти и заменить»​

​ Устанавливаем курсор в​​«Найти и заменить»​оставляем вообще незаполненным.​«Пробел»​=ДЛСТР(B3)-ДЛСТР(ПОДСТАВИТЬ(B3;» «;»»))​ нужно заменить (не​ в этой статье.​ тоже сработает. Тогда​ в ячейках.​ знать )​но ничего не​ после ночной… Это​ » «, «​
​Света, вот такой​ нам все значения.​ аналогичные наименования уже​

​и оператора​​ нижний правый угол​отлично подходит для​ Чтобы удостовериться на​на клавиатуре. В​

​ каждого вида.​​ можно использовать также​ Курсор трансформируется в​

planetaexcel.ru

СЖПРОБЕЛЫ() на VBA ????

​ что делать, если​​ нет пробелов, устанавливаем​вставляем один пробел.​ символ пробела новой​

​(ПОДСТАВИТЬ) может заменить​​мы использовали функцию​
​ String​ отказаться от обработки​ подарок к празднику?​ уберёт только пробелы​ Change.​End Sub​

​ читать?) :)​​ в конце, а​: Лишние пробелы удаляются,​ZVI{/post}{/quote}​ Range​ способом, который нам​ с явными лишними​ было бы максимально​ заполнения. Зажимаем левую​ в конце выражения?​ backspace (в виде​«Заменить все»​=SUBSTITUTE(B3,» «,» | «,C3)​ Вам нужно заменить​

​ ссылку, а также​​ 9 And x​а ввести проверку​lapink2000​ двойные внутри оставит.​ как только они​
​—​For Each v​

​ знаком еще из​​ пробелами. Рассмотрим, к​ удобно использовать во​ кнопку мыши и​ В этом случае​ стрелки) на клавиатуре.​.​=ПОДСТАВИТЬ(B3;» «;» | «;C3)​ только определённое вхождение,​ увидели, что она​ Like «*» &​ каждой ячейки: не​: vikttur,​ А вот в​

​ вариант, а во​​ убрать пробелы.​СЖПРОБЕЛЫ​ в левую границу​ окно с отчетом​

​ можете объединить их​​Если нужно сделать замену​(ИНДЕКС). Кроме этого​End Sub​ ли?​ времени отвечать почти​

​ финиширующие пробелы, а​​ как только они​
​ v в двойных​ > 0​ в котором прописаны​ игрушек будем через​ втором – другой​Как видим, после этих​.​ поля. После этого​ о проделанной работе.​

​ в цикле:​​ применить функцию СЖПРОБЕЛЫ​ недостатка в квалифицированных​
​Hugo​ Забыл ник написать​
​ функцией​
​Wend​ НАЙТИ проставляем пробел,​ смотрим результат. Программа​

​ что их должно​​ пробелы в начале​ заменить преобразованными данными​

​ в начале слова​​ удостоверится, что задача​ же действия, как​Перевел: Антон Андронов​
​ который автоматически изменяется​ изменении своих аргументов.​или​ Range​ :-)​ пробелов нет.​ макрос поможет:​: —​света​
​ том, что он​ быть 3+2=5. В​ и в конце​ значения исходного диапазона.​
​ в ячейке, в​
​ полностью выполнена, производим​ описаны во втором​
​Автор: Антон Андронов​
​ в зависимости от​
​В 27-й день марафона​If InStr(1, Target.NumberFormat,​Application.ScreenUpdating = False​Sub test()​cell = Application.WorksheetFunction.Trim(cell)​’ Удаление крайних​Света, вот такой​

​: :'(​​ убирает все, в​ чем проблема? В​
​ ячейки корректно сможет​
​ Если мы выполним​ конце слова, а​
​ повторный поиск, пока​
​ пункте данной инструкции​Лишние пробелы в тексте​ того, какой регион​ мы займёмся изучением​
​ «h:mm», vbTextCompare) >​

​Set rRange =​​With Selection​ используйте.​ и двойных пробелов​ макрос поможет:​света​
​ том числе между​
​ лишних пробелах.​ только функция​
​ простое копирование, то​
​ также удалить двойные​ не появится сообщение,​ до тех пор,​ не красят любой​ выбран. В этом​ функции​
​ 0 Then …​

​ Intersect(Selection, ActiveSheet.UsedRange)​​.Value = Application.Trim(.Value)​Hugo​Sub TrimSpaces()​
​’ Удаление крайних​: —​ словами. Поэтому этот​Запишем функцию в ячейке​
​СЖПРОБЕЛЫ​
​ скопирована будет формула,​ пробелы.​ что искомое значение​

planetaexcel.ru

​ пока не появится​

Функция

СЖПРОБЕЛЫ(

)

, английский вариант TRIM(),

удаляет из текста все пробелы, за исключением одиночных пробелов между словами. Функция

СЖПРОБЕЛЫ()

используется для обработки текстов, полученных из других прикладных программ, если эти тексты могут содержать лишние пробелы.

Синтаксис функции

СЖПРОБЕЛЫ

(

текст

)

Текст

— текстовая строка, из которого удаляются пробелы.

Пример

Формула

=СЖПРОБЕЛЫ(»         Доход       за первый     квартал   «)

вернет »

Доход за первый квартал

«, т.е. удалены все пробелы за исключением одиночных пробелов между словами. Также удалены пробелы перед первым и после последнего слова.

Символ неразрывного пробела

Функция

СЖПРОБЕЛЫ()

предназначена для удаления из текста только знаков пробела (код символа 32). Страницы в интернете обычно используют и другой знак пробела, который называется

знаком неразрывного пробела

и имеет код 160 (

 )

. Сама по себе функция

СЖПРОБЕЛЫ()

не удалит этот знак неразрывного пробела, это может формула

=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(A1;СИМВОЛ(160);СИМВОЛ(32)))

Формула заменит все знаки неразрывного пробела (код символа 160) знаком пробела (код символа 32) с помощью функции

ПОДСТАВИТЬ()

, а затем удаление начального пробела и повторяющихся промежуточных пробелов из строки в ячейке

А1

.

Кроме того, при вводе в программе MS WORD чисел с разделителями разряда, MS WORD автоматически заменяет пробел, который отделяет разряды, на символ неразрывного пробела. После копирования таких чисел в EXCEL через

Буфер обмена

они вставляются как текст. Как бороться с неразрывным пробелом в этом случае — читайте в этой

статье

.

Функция СЖПРОБЕЛЫ — как пользоваться и примеры

Вы узнаете несколько быстрых и простых способов, чтобы удалить начальные, конечные и лишние пробелы между словами, а также почему функция Excel СЖПРОБЕЛЫ (TRIM в английской версии)  не работает и как это исправить.

Вы сравниваете два столбца на предмет наличия дубликатов, но ваши формулы не могут найти ни одной повторяющейся записи? Или вы складываете два столбца чисел, но получаете только нули? И почему, черт возьми, ваша очевидно правильная формула ВПР возвращает только кучу ошибок Н/Д? Это лишь несколько примеров проблем, на которые вы, возможно, ищете ответы. И все это вызвано дополнительными пробелами, скрытыми до, после или между числовыми и текстовыми значениями в ваших ячейках.

• Как удалить лишние пробелы в столбце?
• Удаление ведущих пробелов
• Как сосчитать лишние пробелы?
• Выделение цветом ячеек с лишними пробелами
• А если СЖПРОБЕЛЫ не работает?
• Инструмент Trim Spaces — удаляйте лишние пробелы одним щелчком мыши.

Microsoft Excel предлагает несколько различных способов очистки данных. В этом руководстве мы исследуем возможности функции СЖПРОБЕЛЫ как самого быстрого и простого способа удаления пробелов в Excel.

Итак, функция СЖПРОБЕЛЫ в Excel применяется, чтобы удалить лишние интервалы из текста. Она удаляет все начальные, конечные и промежуточные, за исключением одного пробела между словами.

Синтаксис её самый простой из возможных:

СЖПРОБЕЛЫ(текст)

Где текст — это ячейка, из которой вы хотите удалить лишние интервалы (или просто текстовая строка, заключённая в двойные кавычки).

Например, чтобы удалить их в ячейке A1, используйте эту формулу:

=СЖПРОБЕЛЫ(A1)

И это скриншот показывает результат:

Ага, это так просто!

Если в дополнение к лишним пробелам ваши данные содержат разрывы строк и непечатаемые символы, используйте функцию СЖПРОБЕЛЫ в сочетании с ПЕЧСИМВ (CLEAN в английской версии), чтобы удалить первые 32 непечатаемых символа в кодовой системе ASCII. 

Например, чтобы удалить пробелы, разрывы строк и другие нежелательные символы из ячейки A1, используйте эту формулу:

=СЖПРОБЕЛЫ(ПЕЧСИМВ(A1))

Дополнительные сведения см. В разделе Как удалить непечатаемые символы в Excel.

Теперь, когда вы знаете основы, давайте обсудим несколько примеров использования СЖПРОБЕЛЫ в Excel, а также те подводные камни, с которыми вы можете столкнуться.

Как убрать лишние пробелы во всём столбце.

Предположим, у вас есть столбец с именами, в котором есть пробелы до и после текста, а также более одного интервала между словами. Итак, как удалить все начальные, конечные и лишние промежуточные пробелы во всех ячейках одним махом? 

Записав формулу Excel СЖПРОБЕЛЫ в соседний столбец, а затем заменив формулы их значениями. Подробные инструкции приведены ниже.

Напишите это выражение для самой верхней ячейки, A2 в нашем примере:

=СЖПРОБЕЛЫ(A2)

Поместите курсор в нижний правый угол ячейки формулы (B2 в этом примере), и как только курсор превратится в знак плюса, дважды щелкните его, чтобы скопировать вниз по столбцу, до последней ячейки с данными. В результате у вас будет 2 столбца — исходные имена с интервалами и имена, приведённые в порядок при помощи формулы.

Наконец, замените значения в исходном столбце новыми данными. Но будьте осторожны! Простое копирование нового столбца поверх исходного сломает ваши формулы. Чтобы этого не случилось, нужно копировать только значения, а не ячейки целиком. 

Вот как это сделать:

Выделите все ячейки с расчетами (B2:B8 в этом примере) и нажмите Ctrl + C, чтобы скопировать их. Или по правой кнопке мыши воспользуйтесь контекстным меню.

Выделите все ячейки со старыми данными (A2:A8) и нажмите Ctrl + Alt + V. Эта комбинация клавиш вставляет только значения и делает то же самое, что и контекстное меню Специальная вставка > Значения.

Нажмите ОК. Готово!

Как удалить ведущие пробелы в числовом столбце

Как вы только что видели, функция Excel СЖПРОБЕЛЫ без проблем удалила все лишние интервалы из столбца текстовых данных. Но что, если ваши данные — числа, а не текст?

На первый взгляд может показаться, что функция СЖПРОБЕЛЫ сделала свое дело. Однако при более внимательном рассмотрении вы заметите, что обрезанные значения не ведут себя как числа. Вот лишь несколько признаков аномалии:

• И исходный столбец, и обрезанные числа выравниваются по левому краю, даже если вы применяете к ним числовой формат. В то время как обычные числа по умолчанию выравниваются по правому краю.
• Когда выбраны две или более ячеек с очищенными числами, Excel отображает только КОЛИЧЕСТВО в строке состояния.Для чисел он также должен отображать СУММУ и СРЕДНЕЕ.
• Формула СУММ, примененная к этим ячейкам, возвращает ноль.

И что нам с этим делать?

Небольшой лайфхак. Если вы вместо СЖПРОБЕЛЫ(A2) используете операцию умножения на 1, то есть A1*1, то получите тот же результат. И еще один элегантный способ избавления от пробелов перед числом:  

=—A1

Но обращаю внимание, что результатом будет являться по-прежнему текст.

А вот такое хитрое выражение сразу превратит текст “    333” в число 333:

=—(—A1)

Вы видите, что все цифры выровнены по левому краю. Дело в том, что очищенные значения представляют собой текстовые строки, а нам нужны числа. Чтобы исправить это, вы можете умножить «обрезанные» значения на 1 (чтобы умножить все значения одним махом, используйте опцию  Специальная вставка > Умножить).

Более элегантное решение — заключить функцию СЖПРОБЕЛЫ в ЗНАЧЕН, например:

=ЗНАЧЕН(СЖПРОБЕЛЫ(A2))

Приведенное выше выражение удаляет все начальные и конечные пробелы, если они есть, и превращает полученное значение в число, как показано на скриншоте ниже:

И более того, если вам нужно именно число, то можете вовсе не утруждать себя удалением лишних символов перед цифрами. Выражение

=ЗНАЧЕН(A2)

сделает это за вас, и вы сразу получите на выходе число, с которым можно производить различные математические операции.

Кроме того, вы можете применить функцию Excel СЖПРОБЕЛЫ для удаления только начальных пробелов, сохраняя их все в середине текстовой строки без изменений. Пример формулы здесь: Как удалить только ведущие пробелы?

Как посчитать лишние пробелы в ячейке.

Чтобы получить количество лишних пробелов в ячейке, узнайте общую длину текста с помощью функции ДЛСТР, затем вычислите длину строки без дополнительных интервалов и вычтите последнее из первого:

=ДЛСТР(A2)-ДЛСТР(СЖПРОБЕЛЫ(A2))

На рисунке ниже показана приведенная выше формула в действии:

Примечание. Выражение возвращает количество дополнительных пробелов в ячейке, т.е. ведущих, конечных и более одного последовательного интервала между словами, но не учитывает отдельные пробелы в середине текста. Если вы хотите получить общее количество пробелов в ячейке, используйте эту формулу замены.

Как выделить ячейки с лишними пробелами?

При работе с конфиденциальной или важной информацией вы можете не решаться удалить что-либо, не видя, что именно вы удаляете. В этом случае вы можете сначала выделить ячейки, содержащие лишние пробелы, а затем безопасно удалить их.

Для этого создайте правило условного форматирования со следующей формулой:

=ДЛСТР($A2)>ДЛСТР(СЖПРОБЕЛЫ($A2))

Где A2 – самый верхний адрес с данными, которые вы хотите выделить.

Мы указываем Excel выделять ячейки, в которых общая длина строки больше, чем длина обрезанного текста.

Чтобы создать правило условного форматирования, выберите все ячейки, которые вы хотите выделить, без заголовков столбцов, перейдите на вкладку «Главная » и нажмите « Условное форматирование» > «Новое правило» > «Используйте формулу…».

Если вы еще не знакомы с условным форматированием Excel, вы найдете подробные инструкции здесь: Как создать правило условного форматирования на основе формулы .

Как показано на скриншоте ниже, результат полностью подтверждается числами, которые мы получили в соседнем столбце:

Как видите, использовать функцию СЖПРОБЕЛЫ в Excel довольно просто. 

Если не работает …

Функция СЖПРОБЕЛЫ предназначена для удаления только символа пробела, представленного значением кода 32 в 7-битном наборе символов ASCII. В наборе Unicode есть так называемый неразрывный пробел, который обычно используется на веб-страницах как символ html & nbsp; . Он имеет десятичное значение 160, и функция СЖПРОБЕЛЫ не может удалить его сама. При копировании текста с веб-страниц или из Word вы вполне можете получить его в свою таблицу.

Иногда такие неразрывные пробелы вставляют специально, чтобы фраза в ячейке не разделялась по строкам. К примеру, некрасиво будет, если инициалы будут оторваны от фамилии и перенесены на следующую строку. В Microsoft Word такой спецсимвол вводится сочетанием клавиш Ctrl+Shift+Пробел.

Итак, если ваш набор данных содержит один или несколько пробелов, которые нашими стандартными методами не получается убрать, используйте функцию ПОДСТАВИТЬ, чтобы преобразовать неразрывные пробелы в обычные, а затем избавиться от их. Предполагая, что текст находится в A1, выражение выглядит следующим образом:

=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(A2; СИМВОЛ(160); » «))

В качестве дополнительной меры предосторожности вы можете встроить функцию ПЕЧСИМВ для очистки ячейки от любых непечатаемых символов:

=СЖПРОБЕЛЫ(ПЕЧСИМВ(ПОДСТАВИТЬ(A2; СИМВОЛ(160); » «)))

На этом рисунке показана разница:

Если приведенные выше варианты также не работают, скорее всего, ваши данные содержат некоторые определенные непечатаемые символы с кодовыми значениями, отличными от 32 и 160.

В этом случае используйте одну из следующих формул, чтобы узнать код символа, где A1 — проблемная ячейка:

Перед текстом: = КОДСИМВ (ЛЕВСИМВ(A1;1))

После текста: = КОДСИМВ (ПРАВСИМВ(A1;1))

Внутри ячейки (где n — позиция проблемного знака в текстовой строке):

=КОДСИМВ(ПСТР(A1; n; 1)))

Затем передайте найденный код проблемного символа в СЖПРОБЕЛЫ(ПОДСТАВИТЬ()), как описано выше.

Например, если функция КОДСИМВ возвращает 9, что является знаком горизонтальной табуляции, используйте следующую формулу для ее удаления:

=СЖПРОБЕЛЫ(ПОДСТАВИТЬ(A2; СИМВОЛ(9); » «))

Инструмент Trim Spaces — удаляйте лишние пробелы одним щелчком мыши.

Если применение формул представляет сложность для вас, тогда вам может понравиться этот метод буквально в один клик, чтобы избавиться от пробелов в Excel. Надстройка Ultimate Suite среди множества полезных инструментов, например, изменение регистра, разделение текста и извлечение из него нужных символов, предлагает опцию «Удалить пробелы» .

Если в Excel установлен Ultimate Suite, то удалить пробелы будет очень просто:

1. Выберите одну или несколько ячеек, в которой вы хотите убрать пробелы.
2. Нажмите кнопку «Trim Spaces» на ленте.
3. Выберите один, несколько или сразу все из следующих вариантов:
   • Обрезать начальные и конечные пробелы.
   • Удалить лишние пробелы между словами, кроме одного.
   • Удалить неразрывные пробелы ( )
   • Удалить лишние переносы строк до и после значений, между значениями оставить только один.
   • Удалить все переносы строк в ячейке.
4. Нажмите кнопку Обрезать (Trim).

Вот и все! Все лишние пробелы удаляются в мгновение ока.

В этом примере мы удаляем всё лишнее, сохраняя только по одному пробелу между словами.

Задача, с которой не справляются формулы Excel, выполняется одним щелчком мыши! Вот результат:

А вот обзор других возможностей работы с текстовыми данными — изменить регистр символов, добавить текст в начале в конце, перед или после выбранных символов, удалить непечатаемые символы, извлечь часть текста по позиции или после указанных символов, извлечь числа из текста, разделить текст по столбцам или строкам и другие полезные операции.

Если вы хотите попробовать этот инструмент на своих данных, вы можете загрузить ознакомительную версию.

Благодарю вас за чтение и с нетерпением жду встречи с вами. В нашем следующем уроке мы обсудим другие способы удаления пробелов в Excel, следите за обновлениями!

Формула ЗАМЕНИТЬ и ПОДСТАВИТЬ для текста и чисел — В статье объясняется на примерах как работают функции Excel ЗАМЕНИТЬ (REPLACE в английской версии) и ПОДСТАВИТЬ (SUBSTITUTE по-английски). Мы покажем, как использовать функцию ЗАМЕНИТЬ с текстом, числами и датами, а также…

Как быстро посчитать количество слов в Excel — В статье объясняется, как подсчитывать слова в Excel с помощью функции ДЛСТР в сочетании с другими функциями Excel, а также приводятся формулы для подсчета общего количества или конкретных слов в…

Как быстро извлечь число из текста в Excel — В этом кратком руководстве показано, как можно быстро извлекать число из различных текстовых выражений в Excel с помощью формул или специального инструмента «Извлечь». Проблема выделения числа из текста возникает достаточно…

Как убрать пробелы в числах в Excel — Представляем 4 быстрых способа удалить лишние пробелы между цифрами в ячейках Excel. Вы можете использовать формулы, инструмент «Найти и заменить» или попробовать изменить формат ячейки. Когда вы вставляете данные из…

Как удалить пробелы в ячейках Excel — Вы узнаете, как с помощью формул удалять начальные и конечные пробелы в ячейке, лишние интервалы между словами, избавляться от неразрывных пробелов и непечатаемых символов. В чем самая большая проблема с…

Функция ПРАВСИМВ в Excel — примеры и советы. — В последних нескольких статьях мы обсуждали различные текстовые функции. Сегодня наше внимание сосредоточено на ПРАВСИМВ (RIGHT в английской версии), которая предназначена для возврата указанного количества символов из крайней правой части…

Функция ЛЕВСИМВ в Excel. Примеры использования и советы. — В руководстве показано, как использовать функцию ЛЕВСИМВ (LEFT) в Excel, чтобы получить подстроку из начала текстовой строки, извлечь текст перед определенным символом, заставить формулу возвращать число и многое другое. Среди…

Функция СЖПРОБЕЛЫ (TRIM) в Excel используется для удаления лишних пробелов в тексте.

Что возвращает функция

Текст без лишних пробелов.

Синтаксис

=TRIM(text) — английская версия

=СЖПРОБЕЛЫ(текст) — русская версия

Аргументы функции

• text (текст) — текст из которого нужно удалить лишние пробелы. Он может быть введен вручную, быть ссылкой на ячейку с текстом. Например, если нам нужно удалить лишние пробелы из текста в ячейке «А1», то нам поможет формула: =TRIM(A1) или =СЖПРОБЕЛЫ(A1).

Примеры использования функции СЖПРОБЕЛЫ в Excel

Пример 1. Убираем лишние пробелы перед словами, после слов, двойные пробелы

На примере ниже текст наполненный массой лишних пробелов.

С помощью функции  СЖПРОБЕЛЫ мы легко уберем все лишнее:

=TRIM(A1) — английская версия

=СЖПРОБЕЛЫ(A1) — русская версия

Скопируйте и протяните эту формулу напротив каждой строки, в которой вы хотите убрать лишние пробелы.

Пример 2. Корректно подсчитываем количество слов в тексте с учетом лишних пробелов

Пробелы это хороший индикатор при подсчете слов в тексте.

Например, если нам нужно понять, какое количество слов во фразе «Как посчитать количество слов в тексте?» то нам поможет формула:

=LEN(A1)-LEN(SUBSTITUTE(A1,» «,»»))+1 — английская версия

=ДЛСТР(A1)-ДЛСТР(СЦЕПИТЬ(A1;» «;»»))+1 — русская версия

Суть формулы заключается в том, что она считает количество пробелов во фразе и вычитывает «1», таким образом получая количество слов в тексте.

Если в тексте есть лишние пробелы, то формула будет считать слова не корректно.

Избежать ошибки и убрать лишние пробелы мы можем с помощью функции СЖПРОБЕЛЫ:

=LEN(TRIM(A1))-LEN(SUBSTITUTE(A1,» «,»»))+1 — английская версия

=ДЛСТР(СЖПРОБЕЛЫ(A1))-ДЛСТР(СЦЕПИТЬ(A1;» «;»»))+1 — русская версия

Весьма часто в нашем распоряжении оказываются данные, которые хоть и содержат полезную информацию, но не пригодны для немедленного анализа. Одной из весьма распространенных проблем является наличие лишних пробелов — в начале, в конце или внутри между словами.

Лечится эта проблема очень легко — специальной функцией СЖПРОБЕЛЫ (TRIM). Она убирает все лишние пробелы, но оставляет по одному пробелу между словами:

Просто и красиво. Но есть пара нюансов.

Неразрывные пробелы не удаляются

Чайной ложкой дегтя тут представляется только невозможность удалять таким способом неразрывные пробелы. Это особый вариант пробела (внешне неотличимый от обычного), на котором не бывает переноса строки. Обычно его используют в случаях типа «г. Москва» или «Иванов И.И.», чтобы эти фразы не разбивались между строчками. В Microsoft Word такой спецсимвол вводится сочетанием клавиш Ctrl+Shift+Пробел и отображается в виде кружка, а не точки:

К сожалению, функция СЖПРОБЕЛЫ (TRIM) удаляет только обычные пробелы. Для удаления неразрывных нужно использовать другие функции или макросы.

Формулы для удаления начальных и концевых пробелов

Если необходимо удалить только начальные пробелы (т.е. не трогать концевые и пробелы между словами), то придется делать это хитрыми формулами, т.к. готовой функции (по аналогии с функцией LTrim в VBA) в Microsoft Excel, к сожалению, нет. 

Формула для удаления лишних пробелов только слева будет выглядеть так:

В английской версии =MID(A1;FIND(LEFT(TRIM(A1));A1);LEN(A1))

Формула для удаления лишних пробелов только справа будет чуть посложнее и должна вводиться уже как формула массива (с Ctrl+Shift+Enter):

В английском варианте это будет =LEFT(A1;MAX((MID(A1&REPT(» «;99);ROW(A1:A99),1);» «)*ROW(A1:A99)))

Ссылки по теме

• Подсветка ячеек с лишними пробелами условным форматированием
• Зачистка текста от лишних пробелов, непечатаемых символов, английских букв и т.д.
• Как проверить текст на соответствие заданному шаблону (маске)

Содержание

• Способ 1: Формула СЖПРОБЕЛЫ
• Способ 2: Функция «Найти и заменить»
• Способ 3: Функция ПОДСТАВИТЬ
• Способ 4: Изменение формата ячейки
• Вопросы и ответы

Способ 1: Формула СЖПРОБЕЛЫ

Формула под названием СЖПРОБЕЛЫ чаще всего применяется, когда удаляются лишние пробелы из обычного текста, однако и сами цифры могут находиться в таком формате ячейки. При этом формула сработает, если речь идет о числовых и денежных форматах, поэтому она точно поможет некоторым пользователям избавиться от ненужных пробелов.

1. Выделите пустую ячейку, куда будут помещены данные после удаления пробелов.



2. Начните запись формулы со знака =, который в синтаксисе Excel ее и обозначает.



3. Впишите название функции СЖПРОБЕЛЫ, по желанию прочитав ее описание.



4. Создайте одинарные скобки сразу же после названия функции без пробела и внесите туда номер ячейки, где требуется удалить лишние пробелы. Нажмите по клавише Enter для подтверждения этой операции.



5. Ознакомьтесь с полученным результатом и выполните то же действие с остальными ячейками путем ручного создания формулы или ее копирования.

Учитывайте, что при таком подходе пробелы не удаляются в оригинальной ячейке, а происходит перенос значения в новую. Это поможет скопировать и заменить необходимые данные или выполнить поиск по огромному массиву значений в таблице.

Способ 2: Функция «Найти и заменить»

Автоматизировать удаление лишних пробелов из огромного количества значений таблицы можно при помощи стандартной функции «Найти и заменить». Это позволит за максимально короткий срок убрать все двойные или тройные пробелы в автоматическом режиме.

1. На вкладке «Главная» найдите опцию «Найти и выделить», разверните ее выпадающее меню и выберите «Заменить».



2. Откроется окно, которое отвечает за настройку быстрой замены символов. В поле «Найти» дважды нажмите клавишу Пробел, чтобы обозначить искомые данные.
   

   В качестве альтернативы, если вставка пробела с клавиатуры не сработает, можете попробовать вставить в поле «Найти» пробел, скопированный из самой таблицы. Многим помогает именно такой вариант.



3. Поле «Заменить на» трогать не нужно, поскольку нет символов, на которые надо заменить пробелы.



4. Если значений всего несколько, используйте кнопку «Заменить», а в противном случае просто нажмите на «Заменить все».



5. Пройдет несколько секунд, после чего появится уведомление об успешном выполнении данной операции. Вернитесь к таблице и удостоверьтесь в изменениях.

Способ 3: Функция ПОДСТАВИТЬ

По аналогии с предыдущим методом работает функция ПОДСТАВИТЬ, для которой задается самая ячейка, искомое значение и ее замена. Требуется активировать пустую клетку, куда будет подставлено уже исправленное значение, а затем вписать в нее следующее: ПОДСТАВИТЬ(A1;" ";""), где A1 — необходимая для обработки ячейка. Создавайте заново или копируйте эту формулу, подставляя другие ячейки, если требуется обработать сразу несколько значений.

Способ 4: Изменение формата ячейки

Этот способ относится только к цифрам, поскольку позволяет изменить их формат, отключив автоматическое добавление пробелов в качестве разделителя групп разрядов, что иногда выбирается автоматически или пользователем вручную. Для этого не нужно обрабатывать каждый блок — можно выбрать сразу все.

1. Выделите требуемые ячейки в таблице с зажатой левой кнопкой мыши.



2. Нажмите по ним ПКМ и в появившемся контекстном меню отыщите пункт «Формат ячеек».



3. Через панель слева перейдите на формат «Числовой» или тот, который изначально был задан для выбранных ячеек.



4. Снимите галочку с пункта «Разделитель групп разрядов» и сохраните изменения.

Вернитесь к таблице и удостоверьтесь в том, что формат ячеек был изменен. Если понадобится, всегда можно повторно открыть это же меню и настроить другой тип отображения.

Еще статьи по данной теме:

Помогла ли Вам статья?

Лишние пробелы в тексте замечают не все. И не для всех это, в общем-то, важно. Но в Excel это может обернуться серьезной проблемой, потому что при выполнении команд программа просто не будет учитывать ячейки с дополнительными пробелами.

Как удалить лишние пробелы в Excel в автоматическом режиме? Чтобы не испортить зрение, вглядываясь в каждую ячейку и убирая лишние доступы клавишей Backspace, можно воспользоваться специальной функцией – СЖПРОБЕЛЫ.

Синтаксис функции СЖПРОБЕЛЫ в Excel

Да, проговорить название команды может оказаться непросто. Но вот понять ее синтаксис и принцип работы очень легко. Если начать вводить команду, то подсветится следующее: =СЖПРОБЕЛЫ(текст). Т.е. в скобках нужно всего лишь задать ячейку (ячейки), в которых необходимо удалить пробелы.

Примечание: функция убирает все лишние пробелы, за исключением того, который ставится по умолчанию между словами.

Те, кто хорошо владеет техникой печатания, наверняка недоумевают, как вообще могут появиться лишние пробелы. Но опытные пользователи знают, что информация для Excel часто копируется из разных источников, которые могли заполняться дилетантами. Поэтому в тексте и встречаются опечатки и ненужные пробелы.



Пример использования функции СЖПРОБЕЛЫ

На небольшом примере рассмотрим, как пользоваться функцией СЖПРОБЕЛЫ. Имеем таблицу, в которой указаны наименования детских игрушек и их количество. Не очень грамотный оператор вел примитивный учет: при появлении дополнительных единиц игрушек он просто впечатывал новые позиции, несмотря на то, что аналогичные наименования уже есть. Наша задача: подсчитать общую сумму каждого вида.

Невооруженным глазом видно, что некоторые позиции написаны с явными лишними пробелами. Рассмотрим, к чему это может привести.

Подсчитывать общее количество позиций по каждому виду игрушек будем через функцию СУММЕСЛИ. Вводим ее, протягиваем на остальные ячейки и смотрим результат. Программа выдала ответ по плюшевым зайцам: 3. Хотя мы видим, что их должно быть 3+2=5. В чем проблема? В лишних пробелах.

Запишем функцию в ячейке D3. В качестве аргумента введем ячейку B3, в которой значится наименование игрушки.

Теперь протянем функцию до 14 строки и увидим, что тексты действительно выровнялись, потому что пробелы удалились. Проверим это наверняка, изменив диапазон в команде СУММЕСЛИ. Вместо B3:B14 пропишем D3:D14 и посмотрим результат. Теперь плюшевых зайцев действительно 5, медведей – 6 и т.п. Получается, символы табуляции играют важную роль, и их нужно подчищать.

СЖПРОБЕЛЫ с другими функциями

Использование функции СЖПРОБЕЛЫ вместе с другими функциями расширяет возможности пользователя. Логично, что она будет использоваться вместе с теми функциями, которые исследуют массивы и возвращают данные. В частности, это функции НАЙТИ, ЛЕВСИМВ, ПРАВСИМВ и др. На практике оказывается, что чаще всего СЖПРОБЕЛЫ используется вместе с ВПР.

Рассмотрим на примере той же таблицы. Задача: проставить цену напротив каждой позиции. Справа дана вспомогательная таблица, в которой прописана цена каждой игрушки. Теоретически мы можем вручную перепечатать нужные нам цифры, но раз мы в Excel, будем использовать ВПР.

Если мы протянем формулу до конца таблицы, увидим следующее:

Розовым цветом мы специально подсветили те позиции, которые написаны с лишними пробелами. Поэтому команда ВПР не выдала по ним результат. Чтобы исправить это, добавим к ВПР функцию СЖПРОБЕЛЫ и посмотрим, что получится.

Т.к. пробелы нам нужно удалить в искомом значении, команду СЖПРОБЕЛЫ поставим на первое место в синтаксисе ВПР. Формула немного видоизменилась, и если теперь мы протянем ее до низа таблицы, функция проставит нам все значения. Теперь все правильно.

Как еще можно удалить лишние пробелы в Excel?

Избавиться от лишних пробелов можно и без использования функции СЖПРОБЕЛЫ. Воспользуемся старым проверенным способом, который нам знаком еще из WORD – команда НАЙТИ-ЗАМЕНИТЬ.

Пример останется тот же самый. Выделяем столбец, в котором прописаны наименования игрушек и нажимаем CTRL+H. В появившемся окне напротив НАЙТИ проставляем пробел, а напротив ЗАМЕНИТЬ НА не пишем ничего.

Проблема такого способа в том, что он убирает все, в том числе между словами. Поэтому этот путь используют, преимущественно, для удаления лишних пробелов в составе чисел.