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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 19.01.2012, 20:44   #1
Сергей_12
Новичок
Джуниор
 
Регистрация: 19.01.2012
Сообщений: 1
Смущение Найти и выделить третье троеточие с начала документа

Добрый...что там у Вас сейчас.

вопрос? Как с помощью VBA Word найти и выделить в литературном тексте, третье троеточие начиная с начала текста?
Сергей_12 вне форума Ответить с цитированием
Старый 20.01.2012, 07:53   #2
viter.alex
Балуюсь кодами
Участник клуба
 
Аватар для viter.alex
 
Регистрация: 09.01.2009
Сообщений: 1,837
По умолчанию

Код:
Selection.HomeKey wdStory
For i = 1 To 3
  Selection.Find.Execute FindText: = "..."
Next i
Вместо трёх точек в кавычки можно поставить знак многоточия, если он используется
Лучше день потерять — потом за пять минут долететь!©
viter.alex вне форума Ответить с цитированием
Старый 20.01.2012, 08:43   #3
Пименов Александр
Форумчанин
 
Регистрация: 17.11.2010
Сообщений: 222
По умолчанию

Цитата:
Сообщение от viter.alex Посмотреть сообщение
Код:
Selection.HomeKey wdStory
For i = 1 To 3
  Selection.Find.Execute FindText: = "..."
Next i
Вместо трёх точек в кавычки можно поставить знак многоточия, если он используется
Уточню код многоточия chr(133)
Код:
Selection.Find.Execute FindText: = chr(133)
Пименов Александр вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Даны числа A,B,C обозначающие дату.Найти номер этого дня от начала года. naty7773 Помощь студентам 5 13.01.2012 13:35
Найти и выделить строки DimOwl Microsoft Office Excel 13 13.08.2011 01:07
Найти и выделить строки (исправить) ddiimm Microsoft Office Excel 2 22.07.2011 01:06
найти в тексте и добавить в конец документа слова,являющиеся палиндромами arthur_92 Microsoft Office Word 2 06.06.2011 18:52
Найти и выделить по выделенной строке диапазон с такой строкой на другом листе (Excel 2003) vfv Microsoft Office Excel 8 10.03.2010 09:30