Имеем книгу из 1 листа с N-ым числом страниц, требуется вставить некую формулу, которая в нужной ячейке отразит число страниц моего документа, т.е. в идеале должно быть выведено число N. немного погугля нарыл формулу:
Запихнул данную строку в макрос:

Вопрос: Можно вставить число страниц минуя макросы, мб есть какая-то формула. Или если же нельзя обойтись без макросов, как сделать макрос автостартующим, чтобы при открытии шаблона EXCEL он сам проставлял число страниц в заданную ячейку.

NullUzerKpaqpTukИмеем книгу из 1 листа с N-ым числом страниц

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

NullUzerKpaqpTuk,


В ячейке вызовешь эту функцию. :)

Спасибо Вам за помощь, дали наводку, но что-то у меня не получается вызвать польз. функцию, получаю ЗНАЧ#

Еще такой момент, в самом шаблоне у меня 1 страница, т.е. в нем таблица с 1 строкой. Далее я средтвами ORACLE заполняю эту таблицу и страниц становится 2. В редакторе VB я поставил на событие . И после открытия отчета я любуюсь цифро 1. То есть выполнение команды идет до заполнения таблицы. Можно ли прогнать команду в момент отображения документа на экран?

NullUzerKpaqpTuk,

1. Функцию надо положить в простой модуль (я сделал, чтобы не отображались разрывы).
2. Чтобы формула автоматически пересчитывала функцию, необходимо среагировать на событие Worksheet_Change и вызвать Application.Calculate. Тогда произойдёт пересчёт страниц. В твоём случае Application.Volatile не нужно, но пусть будет. :)

Вставь в ячейку какую-либо цифру - и увидишь, что вместо 1 будет 3. :) Удачи!

Большое спасибо за пример, оказалось что на 2003 офисе скрипт не работает и возвращает ЗНАЧ, на 2010 все гуд.