Форум программистов, компьютерный форум, киберфорум
MS Office Word
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.73/22: Рейтинг темы: голосов - 22, средняя оценка - 4.73
Kirill94
0 / 0 / 0
Регистрация: 31.10.2012
Сообщений: 6
1

Удалить строки, где имеются повторяющиеся символы

31.10.2012, 13:48. Просмотров 4339. Ответов 11
Метки нет (Все метки)

Добрый день.
Скажите, пожалуйста, как удалить из Word 2007 документа строки, где имеются буквы, которые на этой же строке повторяются.

Например:

ABCD
ACVB
ACFH
ARTY
AABG
ETYE
FFTT

Нужно удалить строки, AABG, ETYE, FFTT, т.к. там есть символы которые повторяются (только на строке, к другой строке отношения НЕ имеет).

Нужно это сделать автоматически, т.к. обрабатывать вручную 50 000 строк слишком долго и можно сделать ошибку.

Заранее спасибо.

P.S.: если есть другие программы, в которых это можно сделать, то я с радостью их загружу.
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
31.10.2012, 13:48
Ответы с готовыми решениями:

Удалить из строки повторяющиеся символы
Дана строка. Удалить из строки повторяющиеся символы. Например: ’aaaabbbaccccdd’ -> ’abacd’

Удалить повторяющиеся символы из строки
помогите пожалуйста решить задачку.Она выглядит так: Дано слово. Удалить из него все повторяющиеся...

Удалить повторяющиеся символы из строки
Здравствуйте, подскажите как можно удалить все повторяющиеся символы из строки?

Как удалить повторяющиеся символы из строки?
хотел писать программу для зашифровки текста шифром простой перестановки . 1.надо ввести текст...

11
shanemac51
Модератор
Эксперт MS Access
9373 / 3705 / 590
Регистрация: 07.08.2010
Сообщений: 10,414
Записей в блоге: 2
31.10.2012, 16:07 2
макросиком перебрать строки, посчитать и удалить(с хвоста документа)
0
Kirill94
0 / 0 / 0
Регистрация: 31.10.2012
Сообщений: 6
31.10.2012, 16:34  [ТС] 3
Цитата Сообщение от shanemac51 Посмотреть сообщение
макросиком перебрать строки, посчитать и удалить(с хвоста документа)

Каким макросиком и как вообще это сделать?
Я в компьютерах новичок, поэтому не совсем понимаю, о чем Вы говорите.
0
shanemac51
Модератор
Эксперт MS Access
9373 / 3705 / 590
Регистрация: 07.08.2010
Сообщений: 10,414
Записей в блоге: 2
31.10.2012, 17:17 4
МАКРОС В ДОКУМЕНТЕ

---
ДЛЯ ЗАПУСКА --НАДО
--РАЗРЕШИТЬ МАКРОСЫ
--ЗАПУСТИТЬ МАКРОС
0
Вложения
Тип файла: zip строки.zip (10.7 Кб, 50 просмотров)
Kirill94
0 / 0 / 0
Регистрация: 31.10.2012
Сообщений: 6
31.10.2012, 17:35  [ТС] 5
Походу, я совсем чайник.
Этого мне не понять.
И макрос не запускается, почему-то.

Можно я Вам скину файл с 7000 строк, а Вы этим макросом уберете строки, где есть повторяющиеся символы?
0
gecata
Модератор
Эксперт HardwareЭксперт Windows
13876 / 6909 / 583
Регистрация: 03.01.2012
Сообщений: 28,486
31.10.2012, 18:11 6
shanemac51, А нету там макроса...
0
Казанский
14914 / 6315 / 1721
Регистрация: 24.09.2011
Сообщений: 9,977
31.10.2012, 20:44 7
Если считать, что строки - это абзацы, то так:
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub bb()
Dim i&, j&, s$
With ActiveDocument.Paragraphs
    For i = .Count To 1 Step -1
        s = .Item(i).Range.Text
        For j = 1 To Len(s) - 1
            If InStr(Mid$(s, j + 1), Mid$(s, j, 1)) Then
                .Item(i).Range.Delete
                Exit For
            End If
        Next
    Next
End With
End Sub
0
Kirill94
0 / 0 / 0
Регистрация: 31.10.2012
Сообщений: 6
31.10.2012, 21:22  [ТС] 8
Извините, но я вообще не понял, что тут. Только недавно начал пользоваться Word, не думал, что так все сложно...
0
Казанский
14914 / 6315 / 1721
Регистрация: 24.09.2011
Сообщений: 9,977
31.10.2012, 21:33 9
Это макрос. Вот он же - в документе. Запускать через Alt+F8 - bb -выполнить.
0
Вложения
Тип файла: doc ABCD.doc (30.5 Кб, 64 просмотров)
Kirill94
0 / 0 / 0
Регистрация: 31.10.2012
Сообщений: 6
31.10.2012, 21:43  [ТС] 10
Я понял, как запустить вам скрипт (макрос).
Но у меня в моем файле очень много различных строк, и на каждой различные символы.
Этот скрипт (макрос) будет работать с другими символами, или нет?
0
Казанский
14914 / 6315 / 1721
Регистрация: 24.09.2011
Сообщений: 9,977
31.10.2012, 22:20 11
А Вы попробуйте, не бойтесь, он (макрос) не кусается
Еще раз: строка должна быть абзацем, т.е. в конце строки должен стоять символ ¶
Нажмите Ctrl+*, проверьте.
0
Kirill94
0 / 0 / 0
Регистрация: 31.10.2012
Сообщений: 6
31.10.2012, 22:25  [ТС] 12
Хорошо, спасибо.
Если что-то не получится, обязательно напишу.
0
31.10.2012, 22:25
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.10.2012, 22:25

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

Удалить из строки все повторяющиеся символы
как удалить со строки все повторяющиеся символы???? заранее благодарен!

Удалить из строки повторяющиеся символы и все пробелы
Вводится строка. Требуется удалить из нее повторяющиеся символы и все пробелы. Например, если было...

Удалить из строки слова, содержащие повторяющиеся символы
Дана строка, состоящая из слов. Удалить из строки слова, содержащие повторяющиеся символы.

Удалить из строки слова, содержащие повторяющиеся символы
Дана строка, состоящая из слов. Удалить из строки слова, содержащие повторяющиеся символы. Задачу...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
12
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.