Как определить на какой странице находится текст?

[dimon15]

Как определить на какой странице находится текст?
Программирую скрипт на VBA.
Как можно зная объект TextFrame и номер строки
определить на какой странице находится эта строка?

 

[Oleg Butrin]

Ответ: Как определить на какой странице находится текст?

В поиск. Обсуждалось сто тысяч миллионов раз.

 

[dimon15]

Ответ: Как определить на какой странице находится текст?

В поиск. Обсуждалось сто тысяч миллионов раз.

Ну не преувеличиваем...
P.S. Одна непонятка - как перейти от номера абзаца в тексте к фрейму и потом к странице? Тоже через Parent?

 

[dimon15]

Ответ: Как определить на какой странице находится текст?

хочется прийти к конструкции вида:


Dim P As Long
For i = 1 To tf.ParentStory.Paragraphs.Count
P = tf.ParentStory.Paragraphs(i).Parent.Name ' ?????
next i

 

[Oleg Butrin]

Ответ: Как определить на какой странице находится текст?

Объясняю сто тысяч миллионов первый, надеюсь он же и последний раз.
Если присмотреться повнимательнее, то можно заметить, что любой текстовый объект уровня line-paragraph-word-character-insertionPoint и т.п. имеет свойство parentTextFrames (parentTextFrame в версии 3). Это ссылка на массив родительских текстовых фреймов. Вот из этого массива выбираем нужный фрейм и по его родительскому объекту определяем нужную страницу.
Вопрос, как определить родительскую страницу текстового фрейма обсуждался даже не сто тысяч миллионов, а гораздо больше раз.

 

[dimon15]

Ответ: Как определить на какой странице находится текст?

ok.
Единственный оставшийся вопрос - что считать страницей для абзаца, который не влез в последний фрейм. Для него ссылка на parent дает nothing. Но это уже логика приложения....

 

[Strizh]

Ответ: Как определить на какой странице находится текст?

ok.
Единственный оставшийся вопрос - что считать страницей для абзаца, который не влез в последний фрейм. Для него ссылка на parent дает nothing. Но это уже логика приложения....

Это уже вам решать, что делать с текстом, который не влез в последний фрейм.
TextFrameOverset так сказать.
либо добавлять страницы и размещать, либо молиться, что бы все влезло.