Word подсчет количества страниц

Программирование на Visual Basic for Applications
13826
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 19.04.2005 (Вт) 10:18

Word подсчет количества страниц

Сообщение 13826 » 19.04.2005 (Вт) 10:20

Для подсчета активной страницы и количества страниц в документе Word использую рекомендованный хелпом макрос

MsgBox "The selection is on page " & _
Selection.Information(wdActiveEndPageNumber) & " of page " _
& Selection.Information(wdNumberOfPagesInDocument)

Результатом работы такого макроса являются два значения -1 -1

Не могу понять почему.

RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 19.04.2005 (Вт) 11:17

Может, перед этим стоит вызывать что то типа Selection.Goto wdGotoEnd, wdDocument?

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 19.04.2005 (Вт) 11:30

А может, вызывать Information не от selection, а от чего-нибудь вроде Document.Range? :)
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

13826
Начинающий
Начинающий
 
Сообщения: 2
Зарегистрирован: 19.04.2005 (Вт) 10:18

Сообщение 13826 » 19.04.2005 (Вт) 23:54

Добрый день! Кажется я предполагаю причину. Попробывал тот же самый макрос на работе на двух машинах. На одной из них стоит 2000, на другой XP. Office на обоих стоит 2003. В обоих случаях макрос работает как надо.

Вообще говоря довольно странно конечно, другие макросы, те, что проверял, на моей машине работают как надо.

Попробую переустановить Office.


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот и гости: 1

    TopList