Как определить конец страницы в Excel

[fedka]

Цитата:

Сообщение от Gustav

Вот, доктора прямо английским по-белому пишут про GET.DOCUMENT(50):
How to determine how many pages will be printed in Excel

Странно, этот подход у меня ни в какую не работает.
cv.double() - выдает 0
cv.toString() - выдает 0x800A07ED VT_ERROR

Если смотрю через макрос в экселе :
"MsgBox ExecuteExcel4Macro("GET.DOCUMENT(50)") & _
" pages will be printed."
- отрабатывает конечно... 0x800A07ED VT_ERROR

[Gustav]

Может, у Вас какие-нибудь языковые проблемы типа как здесь? Может, надо по-русски ПОЛУЧИТЬ.ДОКУМЕНТ писать?

[fedka]

Действитель, Вы правы. Главное вчера читал вашу ссылку, об этом думал, но пост выше моего "TotPageCount : =ПОЛУЧИТЬ.ДОКУМЕНТ(50)" не заметил ) Спасибо!