Как убрать пробел в таблице в ворде

Удаление лишних пробелов в начале и в конце строк ячеек таблицы

You don’t have the permssions to download the attachments of this post.

2 Ответ от viter.alex 26.04.2010 18:25:09

Re: Удаление лишних пробелов в начале и в конце строк ячеек таблицы

Удалить лишние пробелы по краям строки можно функцией Trim и её разновидностями LTrim и RTrim, для обрезки слева и справа соответственно.
Для ячейки это будет выглядеть так

Sub TrimCellText() Dim oCell As Cell For Each oCell In Selection.Tables(1).Range.Cells oCell.Range.Text = Trim(Left(oCell.Range.Text, Len(oCell.Range.Text) - 2)) Next End Sub

Функция Left используется, чтобы убрать из текста ячейки два последних невидимых символа: знак абзаца и знак конца ячейки
Ну а начало ячейки, вернее, номер символа, с которого она начинается, определяется просто:

Selection.Cells(1).Range.Start 'Для ячейки, в которой стоит курсор

Лучше день потерять — потом за пять минут долететь!

3 Ответ от Roman 27.04.2010 08:24:13

Re: Удаление лишних пробелов в начале и в конце строк ячеек таблицы

viter.alex у меня нет слов, все работает! Большое спасибо!

Сообщений [ 3 ]

Страницы 1

Чтобы отправить ответ, вы должны войти или зарегистрироваться

Похожие темы

• Удаление лишних пробелов в Word
• Удаление лишних пробелов между словами
• Одновременное удаление лишних абзацев, пробелов, табуляции в фрагменте
• Расстановка тегов в начале и конце абзаца
• Об удалении лишних пробелов и абзацев
• Макрос для удаления лишних пробелов
• Удаление повторяющихся слов в начале каждой строки Word
• Удаление лишних символов

Удаление лишних пробелов в начале и в конце строк ячеек таблицы

Если вы ищите информацию по самому мощному редактору в мире Microsoft Word в сети, жаловаться на недостаток документов, литературы, различных ссылок и советов придется вряд ли. Наш сайт о Microsoft Office Word даст ответ про: направление текста в ворде с верху в низ. Только в разбросанном виде все это жутко неудобно. Гораздо результативнее общаться на специальных форумах. На портале о Microsoft Office Word вы узнаете про: убрать колонтитул. Это удобнее еще и тем, что на свою проблему вы получите отклики так сказать в развитии, можно будет обсудить, что не получается, что именно не устраивает. На портале о Microsoft Office Word вы узнаете про: как сделать белый фон в ворде. Для русскоязычных пользователей Microsoft Word можно посоветовать форум Ворд Эксперт.

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

Если вы не хотите сами разбираться с макросами или ломать голову над той, либо иной, возникшей в работе проблемой, то в «Заявках на разработку» можете оставить заказ, форумчане вам помогут. Наш сайт о Microsoft Office Word даст ответ про: виды линеек.

Форум Ворд Эксперт — это страничка, которую стоит запомнить, потому что она может пригодиться в любой момент. Наш сайт о Microsoft Office Word даст ответ про: как настроить автонумерацию. Форум и сайт очень разумно устроены, а все пожелания вы можете высказать в соответствующем разделе.

страницы

• полезности word
• книги и программы
• о проекте
• стать автором
• реклама на сайте
• правовая информация

Функция СЖПРОБЕЛЫ

Excel для Microsoft 365 Excel для Microsoft 365 для Mac Excel для Интернета Excel 2021 Excel 2021 для Mac Excel 2019 Excel 2019 для Mac Excel 2016 Excel 2016 для Mac Excel 2013 Excel 2010 Excel 2007 Excel для Mac 2011 Excel Starter 2010 Еще. Меньше

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

Описание

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

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

Синтаксис

Аргументы функции СЖПРОБЕЛЫ описаны ниже.

• Текст Обязательный. Текст, из которого удаляются пробелы.

Пример

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

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

Удаляет начальные и конечные пробелы из текста в формуле («Доход за первый квартал»)

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

Как убрать пробел в таблице в ворде

Argument ‘Topic id’ is null or empty

Сейчас на форуме

© Николай Павлов, Planetaexcel, 2006-2023
info@planetaexcel.ru

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

ООО «Планета Эксел» ИНН 7735603520 ОГРН 1147746834949

ИП Павлов Николай Владимирович ИНН 633015842586 ОГРНИП 310633031600071

Как удалить начальные и конечные пробелы в Word?

После переноса данных из Excel в отчет Word мне надо выстроить их столбцом для удобства восприятия. После вставки значения гуляют как лесенка. Все дело в начальных пробелах. Для решения этой проблемы я решил использовать два цикла в VBA:

Sub RemoveLeadingSpaces() Selection.HomeKey Unit:=wdStory Do While Selection.Start < Selection.End Do Selection.HomeKey Unit:=wdLine firstCharacter = Selection.Characters(0).Text If firstCharacter = " " Then Selection.Characters(0).Delete Else Exit Do End If Loop Selection.MoveDown Unit:=wdLine Loop End Sub 

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

Отслеживать

26.2k 7 7 золотых знаков 31 31 серебряный знак 48 48 бронзовых знаков