Вход


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

Переход на главную страницу

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


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

  


Получение объекта Range через свойство Range


Свойство Range есть у многих объектов (скажем, у Paragraph, Bookmark, Endnote или Cell) и возвращает объект Range. В следующем примере мы получаем объект Range, который ссылается на первый абзац активного документа:

Set myRange = ActiveDocument.Paragraphs(1).Range

Получив ссылку на объект Range, Вы можете использовать его свойства и методы для манипуляций с соответствующим диапазоном. Например, чтобы скопировать первый абзац активного документа:

Set myRange = ActiveDocument.Paragraphs(1).Range
myRange.Copy

А чтобы скопировать первую строку из первой таблицы активного документа:

ActiveDocument.Tables(1).Rows(1).Range.Copy

В следующем примере мы отображаем текст (активного документа), отмеченный первой закладкой (применяется свойство Range объекта Bookmark):

MsgBox ActiveDocument.Bookmarks(1).Range.Text

Оператор With...End With позволяет заметно упростить многократное обращение к свойствам и методам объекта Range. В следующем примере форматируется текст в первом абзаце активного документа:

Set myRange = ActiveDocument.Paragraphs(1).Range
With myRange
     .Bold = True
     .ParagraphFormat.Alignment = wdAlignParagraphCenter
     .Font.Name = "Arial"
End With

Дополнительные примеры, иллюстрирующие применение свойства Range, см. в разделе ?Range Property? справочной системы.



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

  



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

  
За содержание страницы отвечает Гончарова М.Н.
©
Кафедра СПиКБ, 2002-2017