Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Word
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.03.2011, 05:55   #1
Рыжик чик чик
Пользователь
 
Регистрация: 25.05.2010
Сообщений: 10
По умолчанию переход между абзацами

Помогите пожалуйста. Дан документ с тестовыми заданиями. Надо анализировать количество слов в ответах. Оно не должно превышать например 5 слов.
Как пропуская абзацы с вопросами переходить на абзацы с ответами?
Вложения
Тип файла: doc test.doc (38.0 Кб, 17 просмотров)

Последний раз редактировалось Рыжик чик чик; 04.03.2011 в 06:17.
Рыжик чик чик вне форума Ответить с цитированием
Старый 04.03.2011, 15:21   #2
Sasha_Smirnov
Особый статус
Участник клуба
 
Аватар для Sasha_Smirnov
 
Регистрация: 24.11.2008
Сообщений: 1,535
По умолчанию Например, вот так

Код:
Sub Макрос1()
With Selection.Find
.MatchWildcards = True 'соответствует галочке Подстановочные знаки - см. по Ctrl-h'
.Wrap = wdFindStop  'останавливает на первом найденном соответствии шаблону'
.Text = "<[абвгде]\)" 'шаблон (маска) для поиска: буква со скобкой'
.Execute
End With
'при выполнении выделяет отдельно стоящую букву со скобкой;'
'при следующем - следующую пару буква-скобка; остановится - на последней'
End Sub
(Нет, я не знаю, как узнать, что поиск завершён.)
Sasha_Smirnov вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Расстояние между абзацами в CSS Андрей79 HTML и CSS 4 13.04.2009 09:59
Оформление Paragraph - строки между абзацами Fox M. Lurde HTML и CSS 1 26.02.2009 19:08
Переход между формами! Lemo Общие вопросы Delphi 5 05.02.2009 15:50
Отступ между абзацами. Alenka2319 Microsoft Office Word 8 27.05.2008 14:49