Как принудительно установить количество напечатанных страниц (в данном случае 2) диапазона

Как заставить диапазон в Excel VBA сказать ("a1: z60") печатать ТОЛЬКО две страницы page (1) из ("a1:z40") и page(2) из ​​("a41:z60").

Также отдельно, как заставить один и тот же диапазон (скажем, "a1: z60") печатать ТОЛЬКО две страницы page (1) из ("a1: p60") и page(2) из ​​("q1:z60").

Кроме того, я хочу, чтобы масштабирование было максимально возможным (при данных условиях) для каждой из моих двух страниц.

Большое спасибо

1 ответ

Чтобы распечатать выборку на странице:

Range("A1:E44").Select
With ActiveSheet.PageSetup
    .FitToPagesWide = 1
    .FitToPagesTall = 1
End With
Selection.PrintOut Copies:=1

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

Другие вопросы по тегам