|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
17.12.2012, 18:15 | #1 |
Регистрация: 17.12.2012
Сообщений: 3
|
Макросы VBA Word
1. В текстовом документе найти первое слово начинающаеся на гласную букву
2.в текущем абзаце выделить предложение сод-е наименьшее кол-во слов Прошу помощь написать макросы. Если не сложно, дайте объяснения к своим вариантам, я новичок в VBA. |
18.12.2012, 05:22 | #2 |
Балуюсь кодами
Участник клуба
Регистрация: 09.01.2009
Сообщений: 1,837
|
1. Делается поиском <[аеиоуэюяё][! \?\!\.\,\:\;]*>. Подстановочные знаки включены. Поиск записать макросом.
2 Код:
Лучше день потерять — потом за пять минут долететь!©
|
18.12.2012, 11:31 | #3 |
Форумчанин
Регистрация: 17.11.2010
Сообщений: 222
|
По пункту 1 я бы выбрал другой шаблон поиска:
([АЕИОУЭЮЯЁаеиоуэюяё])([А-ЯЁа-яё]{1;}) тогда будет найдено как слово начинающиеся со строчной гласной, так и с прописной гласной, так и слово состоящее из прописных букв полностью Последний раз редактировалось Пименов Александр; 18.12.2012 в 11:37. Причина: Изменение текста |
18.12.2012, 11:38 | #4 |
Балуюсь кодами
Участник клуба
Регистрация: 09.01.2009
Сообщений: 1,837
|
Абсолютно верное замечание. Спасибо
Лучше день потерять — потом за пять минут долететь!©
|
19.12.2012, 19:20 | #5 |
Регистрация: 17.12.2012
Сообщений: 3
|
в текущем абзаце в самом коротком слове в самом коротком предложении поменять порядок следования букв на обратный, а вот такая задача?
|
20.12.2012, 02:26 | #6 |
Особый статус
Участник клуба
Регистрация: 24.11.2008
Сообщений: 1,535
|
А совершенству есть предел?..
<[АЕИОУыЭЮЯЁаеиоуЫэюяё]*>
Находит в заголовке этого поста слово А (а не есть, как было бы по вашему шаблону).
Формула 1 (календарь чемпионата-2016): 26.11.2016 15:55 — Абу-Даби: http://ru.wikipedia.org/wiki/Гран-при_Абу-Даби — (квалификация)! Эфир: http://lion-tv.com/28-match-tv.html
|
20.12.2012, 04:00 | #7 | |
Балуюсь кодами
Участник клуба
Регистрация: 09.01.2009
Сообщений: 1,837
|
Цитата:
Отвечаю. Эта задача тоже выполнима. Как и многие другие, о которых вы пока что не имеете понятия. Действительно. Только я не пойму как этот шаблон работает. По моим представлениям он должен находить только слова из гласных букв, но он находит все. Почему?
Лучше день потерять — потом за пять минут долететь!©
|
|
20.12.2012, 04:16 | #8 |
Особый статус
Участник клуба
Регистрация: 24.11.2008
Сообщений: 1,535
|
И даже есть код*!
Алекс, сам не ожидал! Жаль, ТС не оценит всю красоту момента... Вообще-то, это подстановочный знак * так здорово работает. ________________________ * я было решил, что вполне адекватный (я ж старался!), однако вот что, зараза, он выдал:
Формула 1 (календарь чемпионата-2016): 26.11.2016 15:55 — Абу-Даби: http://ru.wikipedia.org/wiki/Гран-при_Абу-Даби — (квалификация)! Эфир: http://lion-tv.com/28-match-tv.html
Последний раз редактировалось Sasha_Smirnov; 20.12.2012 в 04:48. |
20.12.2012, 04:34 | #9 |
Балуюсь кодами
Участник клуба
Регистрация: 09.01.2009
Сообщений: 1,837
|
Понятно, что это он так работает. Но почему? Делает чужую работу, так сказать. Прямо как мы за ТС
Лучше день потерять — потом за пять минут долететь!©
|
20.12.2012, 04:42 | #10 |
Особый статус
Участник клуба
Регистрация: 24.11.2008
Сообщений: 1,535
|
Тёзка, тов. gurya подаёт нам хороший пример: отдохнуть, послушать пение птиц и певиц.
<[АЕИОУыЭЮЯЁаеиоуЫэюяё]*> означает "гласная в начале слова и что угодно* в конце" ____________ * хоть бы даже и вовсе ничего: то есть та же гласная и в конце
Формула 1 (календарь чемпионата-2016): 26.11.2016 15:55 — Абу-Даби: http://ru.wikipedia.org/wiki/Гран-при_Абу-Даби — (квалификация)! Эфир: http://lion-tv.com/28-match-tv.html
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Макросы Word | gurya | Помощь студентам | 0 | 17.12.2012 18:11 |
Макросы в VBA | Ninaaa | Фриланс | 3 | 09.12.2011 07:27 |
Макросы в VBA | Aleks2215 | Microsoft Office Excel | 1 | 07.11.2010 20:15 |
Макросы в Word | julietteka | Помощь студентам | 0 | 22.03.2010 21:24 |
макросы на VBA | AFA | Microsoft Office Word | 1 | 14.07.2009 14:19 |