Факультет Математики и Информатики ГрГУ: Использование Selection.Find

Вход

Главная страница >> Учебный процесс >> Конспекты >> MS Office. Руководство программиста по Visual Basic для MS Office 97 >> Объекты Microsoft Word >> Работа с объектами Find и Replacement >> Использование Selection.Find

Сервер поддерживается
кафедрой информатики и вычислительной техники ГрГУ
тел. +375-(0)152-445-101
E-mail : kadan@grsu.grodno.by

[Назад] [Содержание ] [Вперед]

Использование Selection.Find

Если Вы обращаетесь к объекту Find через объект Selection, то выделенным фрагментом становится найденный текст. В примере, приведенном ниже, выделяется следующее вхождение слова ?Hello? (если оно не встретится до конца документа, поиск прекратится):

With Selection.Find
     .Forward = True
     .Wrap = wdFindStop
     .Text = "Hello"
     . Execute
End With

Объект Find включает свойства, соответствующие параметрам в диалоговом окне Find and Replace (Найти и заменить) из меню Edit (Правка). Вы можете устанавливать эти свойства индивидуально или через аргументы метода Execute, как показано здесь:

Selection.Find.Execute FindText := "Hello", Forward := True, Wrap := wdFindStop

[Назад] [Содержание ] [Вперед]

Текст пособия подготовлен на основе материалов книги
Microsoft Corporation. Руководство программиста по Visual Basic для Microsoft Office 97 / Пер. с англ. - М.: Издательский отдел "Русская Редакция" ТОО "Channel Trading Ltd.", 1997. - 544 с.: илл.
c Оригинальное издание на английском языке, Microsoft Corporation, 1997
c Русский перевод, Microsoft Corporation, 1997