Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Автоматическое удаление пробелов после последнего символа. - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Автоматическое удаление пробелов после последнего символа. (Форматирование/Formattings)
Автоматическое удаление пробелов после последнего символа.
Serg32rus Дата: Вторник, 17.03.2015, 23:14 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Здравствуйте!
Может кто подскажет каким образом можно удалить ненужные пробелы в ячейках после символов.
Например у меня забито значение в ячейке "Москва " а надо что бы было "Москва" .Просто по тексту в ячейках много таких пробелов после слова...и как их все можно удалить?
 
Ответить
СообщениеЗдравствуйте!
Может кто подскажет каким образом можно удалить ненужные пробелы в ячейках после символов.
Например у меня забито значение в ячейке "Москва " а надо что бы было "Москва" .Просто по тексту в ячейках много таких пробелов после слова...и как их все можно удалить?
Автор - Serg32rus
Дата добавления - 17.03.2015 в 23:14
gling Дата: Вторник, 17.03.2015, 23:22 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2525
Репутация: 678 ±
Замечаний: 0% ±

2010
Здравствуйте. Если в одном столбце можно формулой СЖПРОБЕЛЫ(), а если на всем листе, то Ctrl+H -заменить--два пробела -- на один пробел. Только в этом случае последний пробел все равно не удалится. Но нажимая кнопку несколько раз можно удалить двойные и более пробелы до одного.

ЯД-41001506838083

Сообщение отредактировал gling - Вторник, 17.03.2015, 23:22
 
Ответить
СообщениеЗдравствуйте. Если в одном столбце можно формулой СЖПРОБЕЛЫ(), а если на всем листе, то Ctrl+H -заменить--два пробела -- на один пробел. Только в этом случае последний пробел все равно не удалится. Но нажимая кнопку несколько раз можно удалить двойные и более пробелы до одного.
Автор - gling
Дата добавления - 17.03.2015 в 23:22
Serg32rus Дата: Вторник, 17.03.2015, 23:29 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 21
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Спасибо, только дело в том что даже один пробел малину портит....
 
Ответить
СообщениеСпасибо, только дело в том что даже один пробел малину портит....
Автор - Serg32rus
Дата добавления - 17.03.2015 в 23:29
buchlotnik Дата: Вторник, 17.03.2015, 23:34 | Сообщение № 4
Группа: Заблокированные
Ранг: Участник клуба
Сообщений: 3442
Репутация: 929 ±
Замечаний: 20% ±

2010, 2013, 2016 RUS / ENG
Всё зависит от содержимого ячеек - заменять-то можно и пробел на "" - файл-пример бы увидеть
 
Ответить
СообщениеВсё зависит от содержимого ячеек - заменять-то можно и пробел на "" - файл-пример бы увидеть
Автор - buchlotnik
Дата добавления - 17.03.2015 в 23:34
МВТ Дата: Среда, 18.03.2015, 12:17 | Сообщение № 5
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
Сделать дополнительный столбец, в котором использовать СЖПРОБЕЛЫ(). Потом выделить то, что получилось и вставить в исходный столбец через Специальная вставка - Значения :)
 
Ответить
СообщениеСделать дополнительный столбец, в котором использовать СЖПРОБЕЛЫ(). Потом выделить то, что получилось и вставить в исходный столбец через Специальная вставка - Значения :)
Автор - МВТ
Дата добавления - 18.03.2015 в 12:17
Meissen Дата: Среда, 18.03.2015, 12:58 | Сообщение № 6
Группа: Пользователи
Ранг: Участник
Сообщений: 62
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Цитата МВТ, 18.03.2015 в 12:17, в сообщении № 5
Сделать дополнительный столбец, в котором использовать СЖПРОБЕЛЫ(). Потом выделить то, что получилось и вставить в исходный столбец через Специальная вставка - Значения


можно добавить еще ПЕЧСИМВ для полного форматирования :p
=ПЕЧСИМВ((СЖПРОБЕЛЫ(C8)))
 
Ответить
Сообщение
Цитата МВТ, 18.03.2015 в 12:17, в сообщении № 5
Сделать дополнительный столбец, в котором использовать СЖПРОБЕЛЫ(). Потом выделить то, что получилось и вставить в исходный столбец через Специальная вставка - Значения


можно добавить еще ПЕЧСИМВ для полного форматирования :p
=ПЕЧСИМВ((СЖПРОБЕЛЫ(C8)))
Автор - Meissen
Дата добавления - 18.03.2015 в 12:58
МВТ Дата: Среда, 18.03.2015, 12:59 | Сообщение № 7
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
Сорри, нечаянно дважды запостил


Сообщение отредактировал МВТ - Среда, 18.03.2015, 13:05
 
Ответить
СообщениеСорри, нечаянно дважды запостил
Автор - МВТ
Дата добавления - 18.03.2015 в 12:59
МВТ Дата: Среда, 18.03.2015, 13:02 | Сообщение № 8
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
Или вот такой макрос на выделенный диапазон
[vba]
Код
Sub УдалитьПробелы()
For Each Cell In Selection  
With Cell
     .Value = Application.WorksheetFunction.Trim(.Value)
End With
Next Cell
End Sub
[/vba]

Meissen, тогда [vba]
Код
.Value = Application.WorksheetFunction.Clean(Trim(.Value))
[/vba] :p
 
Ответить
СообщениеИли вот такой макрос на выделенный диапазон
[vba]
Код
Sub УдалитьПробелы()
For Each Cell In Selection  
With Cell
     .Value = Application.WorksheetFunction.Trim(.Value)
End With
Next Cell
End Sub
[/vba]

Meissen, тогда [vba]
Код
.Value = Application.WorksheetFunction.Clean(Trim(.Value))
[/vba] :p
Автор - МВТ
Дата добавления - 18.03.2015 в 13:02
Meissen Дата: Среда, 18.03.2015, 13:04 | Сообщение № 9
Группа: Пользователи
Ранг: Участник
Сообщений: 62
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
а без выделенного диапазона можно? типа нажал кнопку и весь лист отформатировался

[moder]Не надо цитировать пост целиком[/moder]
 
Ответить
Сообщениеа без выделенного диапазона можно? типа нажал кнопку и весь лист отформатировался

[moder]Не надо цитировать пост целиком[/moder]
Автор - Meissen
Дата добавления - 18.03.2015 в 13:04
Michael_S Дата: Среда, 18.03.2015, 13:10 | Сообщение № 10
Группа: Друзья
Ранг: Старожил
Сообщений: 2012
Репутация: 373 ±
Замечаний: 0% ±

Excel2016
Цитата Meissen, 18.03.2015 в 13:04, в сообщении № 9
а без выделенного диапазона можно? т

можно. замените Selection на UsedRange:
[vba]
Код
Sub УдалитьПробелы()
For Each Cell In UsedRange
With Cell
     .Value = Application.WorksheetFunction.Trim(.Value)
End With
Next Cell
End Sub
[/vba]
 
Ответить
Сообщение
Цитата Meissen, 18.03.2015 в 13:04, в сообщении № 9
а без выделенного диапазона можно? т

можно. замените Selection на UsedRange:
[vba]
Код
Sub УдалитьПробелы()
For Each Cell In UsedRange
With Cell
     .Value = Application.WorksheetFunction.Trim(.Value)
End With
Next Cell
End Sub
[/vba]
Автор - Michael_S
Дата добавления - 18.03.2015 в 13:10
МВТ Дата: Среда, 18.03.2015, 13:14 | Сообщение № 11
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
Meissen, в принципе, можно, но зачем? Это существенно дольше
 
Ответить
СообщениеMeissen, в принципе, можно, но зачем? Это существенно дольше
Автор - МВТ
Дата добавления - 18.03.2015 в 13:14
Meissen Дата: Среда, 18.03.2015, 13:18 | Сообщение № 12
Группа: Пользователи
Ранг: Участник
Сообщений: 62
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Цитата Michael_S, 18.03.2015 в 13:10, в сообщении № 10
можно. замените Selection на UsedRange:


не робит.....
 
Ответить
Сообщение
Цитата Michael_S, 18.03.2015 в 13:10, в сообщении № 10
можно. замените Selection на UsedRange:


не робит.....
Автор - Meissen
Дата добавления - 18.03.2015 в 13:18
Meissen Дата: Среда, 18.03.2015, 13:20 | Сообщение № 13
Группа: Пользователи
Ранг: Участник
Сообщений: 62
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Цитата МВТ, 18.03.2015 в 13:14, в сообщении № 11
в принципе, можно, но зачем? Это существенно дольше


ну тогда не весь лист а хотябы страницу?
 
Ответить
Сообщение
Цитата МВТ, 18.03.2015 в 13:14, в сообщении № 11
в принципе, можно, но зачем? Это существенно дольше


ну тогда не весь лист а хотябы страницу?
Автор - Meissen
Дата добавления - 18.03.2015 в 13:20
Michael_S Дата: Среда, 18.03.2015, 13:25 | Сообщение № 14
Группа: Друзья
Ранг: Старожил
Сообщений: 2012
Репутация: 373 ±
Замечаний: 0% ±

Excel2016
Цитата Meissen, 18.03.2015 в 13:18, в сообщении № 12
не робит.....

если у вас макрос в стандартном модуле, то тогда
[vba]
Код
Sub УдалитьПробелы()
For Each Cell In ActiveSheet.UsedRange
With Cell
     .Value = Application.WorksheetFunction.Trim(.Value)
End With
Next Cell
End Sub
[/vba]
 
Ответить
Сообщение
Цитата Meissen, 18.03.2015 в 13:18, в сообщении № 12
не робит.....

если у вас макрос в стандартном модуле, то тогда
[vba]
Код
Sub УдалитьПробелы()
For Each Cell In ActiveSheet.UsedRange
With Cell
     .Value = Application.WorksheetFunction.Trim(.Value)
End With
Next Cell
End Sub
[/vba]
Автор - Michael_S
Дата добавления - 18.03.2015 в 13:25
МВТ Дата: Среда, 18.03.2015, 13:25 | Сообщение № 15
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
Meissen, вынужден Вас разочаровать: в рабочем листе только одна страница, а не две, как на бумажном :D
 
Ответить
СообщениеMeissen, вынужден Вас разочаровать: в рабочем листе только одна страница, а не две, как на бумажном :D
Автор - МВТ
Дата добавления - 18.03.2015 в 13:25
Meissen Дата: Среда, 18.03.2015, 13:33 | Сообщение № 16
Группа: Пользователи
Ранг: Участник
Сообщений: 62
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
МВТ, я имел ввиду в страничном режиме))
 
Ответить
СообщениеМВТ, я имел ввиду в страничном режиме))
Автор - Meissen
Дата добавления - 18.03.2015 в 13:33
Meissen Дата: Среда, 18.03.2015, 13:34 | Сообщение № 17
Группа: Пользователи
Ранг: Участник
Сообщений: 62
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Michael_S, во! супер! робит! hands
 
Ответить
СообщениеMichael_S, во! супер! робит! hands
Автор - Meissen
Дата добавления - 18.03.2015 в 13:34
МВТ Дата: Среда, 18.03.2015, 13:53 | Сообщение № 18
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация: 137 ±
Замечаний: 0% ±

Excel 2007
Michael_S, согласен, так удобнее
 
Ответить
СообщениеMichael_S, согласен, так удобнее
Автор - МВТ
Дата добавления - 18.03.2015 в 13:53
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Автоматическое удаление пробелов после последнего символа. (Форматирование/Formattings)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!