Программно сохранить всю книгу в один файл PDF

[uralshans]

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

Экспорт в ПДФ, - по сути, есть распечатка
Т.е. результат точно такой же, как при печати нескольких выделенных листов (сначала первый лист, со следующей страницы - следующий, и т.д.)

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

Возможно ли сделать так чтоб, каждый лист книги эксель начанался с нового листа, но если в книге рабочий лист растягивается на 2-3 листа, то в PDF он не старается уместиться на 1 листе? ??

[uralshans]

Спасибо Вам за помощь!

Но после всех махинаций, возникла большая проблема. Не знаю что послужило причиной, но дело вот в чем:

Все формулы в ячейках перестали работать. Работают, только в такой последовательности действий:
Выделяю ячейку, кликаю на строку (справа от названия ячейки, где вносим само формулу), ничего не меняю жму Enter. После этого формула срабатывает. И так нужно в каждой ячейке где есть формулы.

Что делать?

[EducatedFool]

Что делать?

Снова включить автоматический пересчёт формул в настройках Excel
(на вкладке «Формулы» кнопка «Параметры вычислений»)

то в PDF он не старается уместиться на 1 листе?

ничего подобного у меня не наблюдается (выводится всё как на принтер)
Сами, наверное, начудили в своём файле, - включив в параметрах вывода листа на печать опцию «масштаб: разместить не более чем на 1 странице по вертикали и горизонтали»

[uralshans]

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

Снова включить автоматический пересчёт формул в настройках Excel
(на вкладке «Формулы» кнопка «Параметры вычислений»)

Но после экспорта книги в pdf опять включается ручной режим..

[uralshans]

Вообщем ручной режим включается если мы выделяем листы кодом:

Worksheets("Лист1").Select    ' выделяем первый лист
    Worksheets("Лист2").Select False    ' добавляем к выделению другой лист
    Worksheets("Лист4").Select False    ' и ещё один

Если это не использовать, то всё ОК.

[EducatedFool]

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

Ищите в своем файле такую строку, - проблема из-за неё:

Application.Calculation = xlCalculationManual

PS: Ну и не забывайте снимать выделение с нескольких листов, по окончании экспорта в ПДФ
А то измените какую-нибудь ячейку, - изменения выполнятся на всех выделенных листах.

[uralshans]

EducatedFool
Благодарю за помощь!!