Удалить ненужные символы
Удалите определенные нежелательные или не алфавитно-цифровые символы из текста
Редактировать
Список символов:
Укажите символы, которые необходимо удалить
Все символы будут удалены, кроме букв и цифр
Описание:
Используйте этот инструмент для удаления нежелательных символов, цифр, букв английского или русского алфавита, знаков препинания. Просто введите символы, которые вы хотите удалить в текстовое поле и нажмите кнопку «Удалить». Нет необходимости добавлять разделители, такие как запятая или escape-символы. Есть также несколько шаблонов, доступных для использования.
Шаблоны:
- Свой символ — Удалить любой ваш символ или набор символов, который вы добавите в поле ввода.
- Все не алфавитно-цифровые. Удалить любой символ, который не является цифрой или буквой (в верхнем или нижнем регистре).
- Диакритические знаки — Удалить все буквы с ударением.
- Английские буквы — Удалить все английские буквы от Аа до Zz.
- Русские буквы — Удалить все русские буквы от Аа до Яя.
- Числа — Удалить все числа (0 — 9).
- Знаки препинания — Удалить все знаки препинания.
- Специальные символы — Удалить все не алфавитно-цифровых маркеры, специальные символы и мнемоники.
Примечание. Все шаблоны, кроме «Все не алфавитно-цифровые», могут быть изменены в соответствии с вашими потребностями. Если у вас есть определенный набор символов, который вы хотите удалить, используйте «Свой символ».
Похожие инструменты:
- Очиститель текста — Универсальный инструмент для очистки и форматирования текста.
- Убрать HTML-теги — Удалите все HTML-теги из текста.
- Удалить пробелы — Найти одинаковые строки в документе и удалить дубликаты.
- Удалить дубликаты строк — Найти одинаковые строки в документе и удалить дубликаты.
- Удалить пустые строки — Избавьтесь от всех строк в тексте, которые состоят только из пробелов (пробелов или табуляции).
- Удалить ненужные строки — Удаление строк, содержащих или не содержащих определенное слово, фразу или строку в тексте.
- Удалить диакритические знаки — Удалите диакритические знаки, чтобы преобразовать ударные буквы в латинские символы.
- Удалить эмодзи — Удалите все смайлики и символы Unicode, встроенные в текстовые сообщения.
Макрос на удаление определенных символов.
Требуется создать макрос, при запуске которого, он удалял символы, которые прописаны у него в конфиге. Т.е. есть текст, а мне во всем тексте нужно удалить символы, например — г., ул., р-н
Как подобное сделать?
2 Ответ от aap77 20.11.2011 10:05:26
Re: Макрос на удаление определенных символов.
1. Способ воспользоваться объектом InputBox, для определения списка удаляемых слов.
Public Sub DeleteListWord() Dim inp As String, list As Variant inp = InputBox("Введите слова для удаления" & Chr(13) _ & "через разделитель $. Например: " _ & "г.$ул.$р-н") 'Запрашиваем список удаляемых слов list = Split(inp, "$") 'Создаем список слов For i = LBound(list) To UBound(list) 'Циклом заменяем слова списка Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = list(i) .Replacement.Text = "" End With Selection.Find.Execute Replace:=wdReplaceAll Next i End Sub3 Ответ от DYm00n 20.11.2011 11:10:40
Re: Макрос на удаление определенных символов.
aap77 пишет:
1. Способ воспользоваться объектом InputBox, для определения списка удаляемых слов.
Public Sub DeleteListWord() Dim inp As String, list As Variant inp = InputBox("Введите слова для удаления" & Chr(13) _ & "через разделитель $. Например: " _ & "г.$ул.$р-н") 'Запрашиваем список удаляемых слов list = Split(inp, "$") 'Создаем список слов For i = LBound(list) To UBound(list) 'Циклом заменяем слова списка Selection.Find.ClearFormatting Selection.Find.Replacement.ClearFormatting With Selection.Find .Text = list(i) .Replacement.Text = "" End With Selection.Find.Execute Replace:=wdReplaceAll Next i End SubНу не совсем так — мне нужно, чтобы в самом макросе уже были заданы эти слова. Т.е. я хочу повесить его на горячую клавишу и как только я нажимаю на нее, макрос без лишних вопросов удаляет подобные сокращения (которые я уже ввел в настройки макроса заранее). Кстати, хотелось бы еще добавить функцию, чтобы он больше одного пробела подряд удалял.
4 Ответ от aap77 20.11.2011 11:56:31
Re: Макрос на удаление определенных символов.
inp = InputBox("Введите слова для удаления" & Chr(13) _ & "через разделитель $. Например: " _ & "г.$ул.$р-н") 'Запрашиваем список удаляемых словlist=array("г.","ул.", "р-н") 'Создает массив зарезервированных слов5 Ответ от DYm00n 20.11.2011 12:07:03
Re: Макрос на удаление определенных символов.
aap77 пишет:
inp = InputBox("Введите слова для удаления" & Chr(13) _ & "через разделитель $. Например: " _ & "г.$ул.$р-н") 'Запрашиваем список удаляемых словlist=array("г.","ул.", "р-н") 'Создает массив зарезервированных словА как быть с
>Кстати, хотелось бы еще добавить функцию, чтобы он больше одного пробела подряд удалял.
6 Ответ от DYm00n 20.11.2011 12:14:55
Re: Макрос на удаление определенных символов.
DYm00n пишет:
aap77 пишет:
inp = InputBox("Введите слова для удаления" & Chr(13) _ & "через разделитель $. Например: " _ & "г.$ул.$р-н") 'Запрашиваем список удаляемых словlist=array("г.","ул.", "р-н") 'Создает массив зарезервированных словА как быть с
>Кстати, хотелось бы еще добавить функцию, чтобы он больше одного пробела подряд удалял.
Если я правильно понял, то текст макроса должен быть такой —
Public Sub DeleteListWord()
Dim inp As String, list As Variant
list=array(«г.»,»ул.», «р-н») ‘Создает массив зарезервированных слов
list = Split(inp, «$») ‘Создаем список слов
For i = LBound(list) To UBound(list) ‘Циклом заменяем слова списка
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = list(i)
.Replacement.Text = «»
End With
Selection.Find.Execute Replace:=wdReplaceAll
Next i
End Sub
Меня вот только смушают выделенные фрагменты. Все правильно? У меня данный макрос не работает и ошибок даже не выдает
Сообщений [ 6 ]
Страницы 1
Чтобы отправить ответ, вы должны войти или зарегистрироваться
Похожие темы
- Выделение и замена определенных наборов символов во всем тексте
- Удаление лишних символов
- Удаление нескольких символов абзаца не срабатывает перед таблицами
- Макрос для копирования определенного количества символов
- Макрос отображения общего количества символов
- Печать определенных страниц в word
- Выделение курсивом определенных фрагментов
- Ввод определенных кусков текста?
Макрос на удаление определенных символов.
Очень часто у пользователей компьютеров возникают вопросы по тем или иным программам. Чтобы найти ответы — кто-то покупает необходимую литературу, кто-то ищет ответ в интернете. Наш сайт о Microsoft Office Word даст ответ про: где хранится файл normal.dot. Но нужную литературу не всегда можно найти в магазине, а в интернете – можно просто потеряться в море информации. Наш сайт о Microsoft Office Word даст ответ про: как повернуть в ворде один лист. В случае, если вас интересует приложение Microsoft Word – то смело можете обращаться на сайт Ворд Эксперт. На портале о Microsoft Office Word вы узнаете про: можно ли ворд 2007 открыть в ворд 2003.
На сайте Ворд Эксперт вы найдете все, что вам необходимо – от списка требуемой литературы до подробных ответов на интересующие вас вопросы. На портале о Microsoft Office Word вы узнаете про: ключь для офиса.
Если вы совершенно не знакомы с программой Microsoft Word, то в «Основном разделе» сайта вам помогут не только освоить основные принципы работы в ней, но и расскажут о многие ее нюансах и секретах. На портале о Microsoft Office Word вы узнаете про: как открыть вордовский документ с флешки 2007 г. если у меня только ворд 2003 г.. Вы узнаете — как правильно делать форматирование и редактирование, как писать макросы, как совместить различные версии, как правильно расставить колонтитулы и т.п. На портале о Microsoft Office Word вы узнаете про: как в world вставить спецсимвол.
При необходимости, вы можете обратиться в раздел «заявок и заказов», оформить заявку на выполнение любой работы в приложении Microsoft Word и получить готовую качественную работу. Наш сайт о Microsoft Office Word даст ответ про: как сделать приглашения в ворде.
Наличие на сайте оперативной обратной связи тоже может вам пригодится. Можно обращаться и в случае, если вы не нашли ответ на свой вопрос, и в случае если вы хотите внести свои замечания по работе сайта. На портале о Microsoft Office Word вы узнаете про: сантиметры word 2007. Форум работает круглосуточно и вам всегда будут рады помочь.
страницы
- полезности word
- книги и программы
- о проекте
- стать автором
- реклама на сайте
- правовая информация
Обрезка и удаление символов из строк в .NET
Если вы анализируете предложение на отдельные слова, вы можете получить слова с пустыми пробелами (также называемыми пробелами) на обоих концах слова. В этом случае можно использовать один из методов обрезки в System.String классе , чтобы удалить любое количество пробелов или других символов из указанной позиции в строке. В следующей таблице описаны доступные методы обрезки.
| Имя метода | Использовать |
|---|---|
| String.Trim | Удаление пробелов или знаков, указанных в массиве знаков, из начала и конца строки. |
| String.TrimEnd | Удаление символов, указанных в массиве символов, в конце строки. |
| String.TrimStart | Удаление символов, указанных в массиве символов, в начале строки. |
| String.Remove | Удаление указанного количества символов в указанной позиции индекса в строке. |
Trim
Вы можете легко удалить пробелы с обоих концов строки с помощью String.Trim метода , как показано в следующем примере:
String^ MyString = " Big "; Console::WriteLine("HelloWorld!", MyString); String^ TrimString = MyString->Trim(); Console::WriteLine("HelloWorld!", TrimString); // The example displays the following output: // Hello Big World! // HelloBigWorld! string MyString = " Big "; Console.WriteLine("HelloWorld!", MyString); string TrimString = MyString.Trim(); Console.WriteLine("HelloWorld!", TrimString); // The example displays the following output: // Hello Big World! // HelloBigWorld! Dim MyString As String = " Big " Console.WriteLine("HelloWorld!", MyString) Dim TrimString As String = MyString.Trim() Console.WriteLine("HelloWorld!", TrimString) ' The example displays the following output: ' Hello Big World! ' HelloBigWorld! Кроме того, можно удалить символы, указанные в массиве знаков, из начала и конца строки. В следующем примере удаляются пробелы, точки и звездочки:
using System; public class Example < public static void Main() < String header = "* A Short String. *"; Console.WriteLine(header); Console.WriteLine(header.Trim( new Char[] < ' ', '*', '.' >)); > > // The example displays the following output: // * A Short String. * // A Short String Module Example Public Sub Main() Dim header As String = "* A Short String. *" Console.WriteLine(header) Console.WriteLine(header.Trim()) End Sub End Module ' The example displays the following output: ' * A Short String. * ' A Short String TrimEnd
Метод String.TrimEnd удаляет символы из конца строки, создавая новый строковый объект. Для указания символов, которые следует удалять, в этот метод передается массив символов. Порядок элементов в массиве символов не влияет на операцию обрезки. В случае обнаружения символа, который отсутствует в массиве, операция останавливается.
В следующем примере удаляются последние буквы строки с помощью TrimEnd метода . В этом примере положение символа ‘r’ и символа ‘W’ повернуты обратно, чтобы проиллюстрировать, что порядок символов в массиве не имеет значения. Обратите внимание, что этот код удаляет последнее слово MyString и часть первого.
String^ MyString = "Hello World!"; array^ MyChar = ; String^ NewString = MyString->TrimEnd(MyChar); Console::WriteLine(NewString); string MyString = "Hello World!"; char[] MyChar = ; string NewString = MyString.TrimEnd(MyChar); Console.WriteLine(NewString); Dim MyString As String = "Hello World!" Dim MyChar() As Char = Dim NewString As String = MyString.TrimEnd(MyChar) Console.WriteLine(NewString) Этот код выводит на консоль значение He .
В следующем примере удаляется последнее слово строки с помощью TrimEnd метода . В этом коде запятая следует за словом Hello . Так как запятая не указана в массиве символов для обрезки, обрезка заканчивается запятой.
String^ MyString = "Hello, World!"; array^ MyChar = ; String^ NewString = MyString->TrimEnd(MyChar); Console::WriteLine(NewString); string MyString = "Hello, World!"; char[] MyChar = ; string NewString = MyString.TrimEnd(MyChar); Console.WriteLine(NewString); Dim MyString As String = "Hello, World!" Dim MyChar() As Char = Dim NewString As String = MyString.TrimEnd(MyChar) Console.WriteLine(NewString) Этот код выводит на консоль значение Hello, .
TrimStart
Метод String.TrimStart аналогичен методу , String.TrimEnd за исключением того, что он создает новую строку путем удаления символов из начала существующего строкового объекта. Массив символов передается методу TrimStart для указания удаляемых символов. Как и в случае с методом TrimEnd , порядок элементов в массиве символов не влияет на операцию обрезки. В случае обнаружения символа, который отсутствует в массиве, операция останавливается.
В следующем примере удаляется первое слово в строке. В этом примере положение символа ‘l’ и символа ‘H’ повернуты обратно, чтобы проиллюстрировать, что порядок символов в массиве не имеет значения.
String^ MyString = "Hello World!"; array^ MyChar = ; String^ NewString = MyString->TrimStart(MyChar); Console::WriteLine(NewString); string MyString = "Hello World!"; char[] MyChar = ; string NewString = MyString.TrimStart(MyChar); Console.WriteLine(NewString); Dim MyString As String = "Hello World!" Dim MyChar() As Char = Dim NewString As String = MyString.TrimStart(MyChar) Console.WriteLine(NewString) Этот код выводит на консоль значение World! .
Удалить
Метод String.Remove удаляет указанное количество знаков, начиная с указанного места в существующей строке. Этот метод подразумевает, что отсчет индекса начинается с нуля.
В следующем примере удаляется 10 символов из строки, начинающейся с пятой позиции отсчитываемого от нуля индекса строки.
String^ MyString = "Hello Beautiful World!"; Console::WriteLine(MyString->Remove(5,10)); // The example displays the following output: // Hello World! string MyString = "Hello Beautiful World!"; Console.WriteLine(MyString.Remove(5,10)); // The example displays the following output: // Hello World! Dim MyString As String = "Hello Beautiful World!" Console.WriteLine(MyString.Remove(5, 10)) ' The example displays the following output: ' Hello World! Замените
Чтобы удалить из строки указанный символ или подстроку, можно вызвать метод String.Replace(String, String) и указать пустую строку (String.Empty) в качестве замены. В следующем примере удаляются все запятые из строки:
using System; public class Example < public static void Main() < String phrase = "a cold, dark night"; Console.WriteLine("Before: ", phrase); phrase = phrase.Replace(",", ""); Console.WriteLine("After: ", phrase); > > // The example displays the following output: // Before: a cold, dark night // After: a cold dark night Module Example Public Sub Main() Dim phrase As String = "a cold, dark night" Console.WriteLine("Before: ", phrase) phrase = phrase.Replace(",", "") Console.WriteLine("After: ", phrase) End Sub End Module ' The example displays the following output: ' Before: a cold, dark night ' After: a cold dark night См. также
Совместная работа с нами на GitHub
Источник этого содержимого можно найти на GitHub, где также можно создавать и просматривать проблемы и запросы на вытягивание. Дополнительные сведения см. в нашем руководстве для участников.
The .NET documentation is open source. Provide feedback here.
Обратная связь
Отправить и просмотреть отзыв по
Доброго времени суток. Возможно ли удалить один символ со всего документа в ворде (Microsoft Word)?
¬ -символ, очень часто встречается, и он в данном документе не нужен, нужно его удалить, т. к. в документе странниц возиться придётся много. Есть способ выделить его и убрать из всего документа?
Дополнен 11 лет назад
250 старниц*
Дополнен 11 лет назад
Проблема в том, что в поиске и замене этот символ не определяется. Другие способы есть?
п. с.
я бы не спрашивал просто так.
Дополнен 11 лет назад
с мягким переносом он как ни странно тоже не находит (,я много вариантов испробовал. не видит символ и всё,сохранял заново запускал. в другом документе тоже не видит. ((
Всем большое спасибо, за ответы. Придётся в ручную.
Дополнен 11 лет назад
перезагрузил комп, после вошёл в ворд. и о чудо) он стал обнаружить этот символ))
Лучший ответ
Мягкий перенос это. Находится тут:
Или просто в поле «Найти» вставить ^-, а поле «Заменить на» оставить пустым и нажать «Заменить все».
Остальные ответы
Нажимает «Заменить» в менюшках Ворда, в первом поле нужный символ, а второе оставьте пустым.
О Боже мой! Это новое поколение Пепси! Жми Ctrl+H и вставь в поле Заменить нужный символ, а в поле НА ничего не вставляй. 250 стАрниц.. .
На всякий случай, Н — это не русская буква Эн, а это английская Аш.
Если текст заблокирован кем-то, то не получится. Если Вы заблокировали, то разблокировать и удаляйте символ. Можно сканировать Тот лист с Тем текстом с Тем символом, ввести сканированную копию в Word, удалить ненужный символ и распечатать Этот лист с исправлением и подкрепить к общему документу, всё!