Страница 1 из 1

Выделить несколько страниц текста в WORD

Добавлено: 28 сен 2009, 09:44
Иванов
Добрый день, форумчане!
Одну страницу открытого документа можно выделить так:
ActiveDocument.Sections(НомерСтраницы).Range.Select

А не подскажете, как выделить одновременно, две страницы (текущую и следующую) ?

Re: Выделить несколько страниц текста в WORD

Добавлено: 30 сен 2009, 02:56
Busine2009
Иванов

в VBA нет объекта Страница.
Здесь

Код: Выделить всё

ActiveDocument.Sections(НомерСтраницы).Range.Selec t
Sections(НомерСтраницы) - не номер страницы, а номер раздела. Выделить несколько страниц сложно простому смертному: нужен опыт и знание объекта Range.

Re: Выделить несколько страниц текста в WORD

Добавлено: 30 сен 2009, 09:37
Иванов
Busine2009 писал(а):Иванов

в VBA нет объекта Страница.
Здесь

Код: Выделить всё

ActiveDocument.Sections(НомерСтраницы).Range.Selec t
Sections(НомерСтраницы) - не номер страницы, а номер раздела. Выделить несколько страниц сложно простому смертному: нужен опыт и знание объекта Range.
Тогда я не простой смертный. Текст разбил постранично на разделы и сделал так:
With ActiveDocument
.Range(.Sections(ТекСтр).Range.Start, .Sections(ТекСтр + 1).Range.End).Select
End With

Re: Выделить несколько страниц текста в WORD

Добавлено: 30 сен 2009, 20:17
Busine2009
Это ненормально, чтобы каждая страница была разделом, когда этого не требует здравый смысл, так что ты не прав, но если тебе так удобно, то это твоё право.

Re: Выделить несколько страниц текста в WORD

Добавлено: 01 окт 2009, 10:03
Иванов
У меня стандартные документы, имеющие конкретный текст на страницах. Что бы текст в документе не расползался при наборе текста на предыдущих, я разбил их на разделы.