Факультет Математики и Информатики ГрГУ: Получение объекта Range методом Range

Вход

Главная страница >> Учебный процесс >> Конспекты >> 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 в документе предназначен метод Range объекта Document. Этот метод возвращает объект Range, размещенный в основной области (main story) и представляющий заданный диапазон. В следующем примере мы создаем объект Range и присваиваем его переменной myRange:

Set myRange = ActiveDocurnent.Range( Start:=0, End:=10)

Здесь myRange представляет первые 10 символов активного документа. В следующем примере к первым 10 символам активного документа применяется полужирное начертание:

Set myRange = ActiveDocument.Range(Start:=0, End:=10) myRange.Bold = True

Создав специальную переменную myRange и закрепив за ней объект Range оператором Set, мы получили возможность многократно ссылаться на этот объект в своей программе. Если же объект нужен только для однократного использования, создавать отдельную переменную для его хранения нет никакого смысла. В таком случае создание диапазона и операцию над ним лучше свести в одну инструкцию:

ActiveDocument.Range(Start:=0.End:=10).Bold =True

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

ActiveDocument.Range ( Start :=0, End : =0) .InsertBefore Text : = " Hello"

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

Set myDoc = ActiveDocument
Set myRange = myDoc.Range (Start := myDoc.Sentences(3).Start, _
End := myDoc.Sentences(4).End)
aRange.Select

Совет: Объект Range не имеет визуального представления в документе. Чтобы убедиться, на правильный ли диапазон текста ссылается объект Range, . воспользуйтесь методом Select ? он выделит соответствующий фрагмент текста. В следующем примере объект Range ссылается на первые три абзаца активного документа. После выполнения показанных ниже инструкций на экране будет выделен диапазон текста, содержащийся в переменной aRange.

Set aRange = ActiveDocument.Range(Start := 0, _
End := ActiveDocument.Paragraphs(3).Range.End)
aRange.Select

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

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