powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Область печати для каждого листа.
6 сообщений из 6, страница 1 из 1
Область печати для каждого листа.
    #33585964
SergeyS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет всем! Задаю область печати програмно ActiveSheet.PageSetup.printarea = "$A$1:$J$" + CStr(nrows), тем самым получаю несколько страниц.
Как задать програмно (кодом) область печать для каждой страницы? Т.е. нужно указать какие строки будут на страницы.
...
Рейтинг: 0 / 0
Область печати для каждого листа.
    #33586827
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
SergeySПривет всем! Задаю область печати програмно ActiveSheet.PageSetup.printarea = "$A$1:$J$" + CStr(nrows), тем самым получаю несколько страниц.
Как задать програмно (кодом) область печать для каждой страницы? Т.е. нужно указать какие строки будут на страницы.
WorkSheet(1).PageSetup.PrintArea = "B3:D45"
...
Рейтинг: 0 / 0
Область печати для каждого листа.
    #33588888
SergeyS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Этим задается все область печати, а мне нужно указать какие строки печатать на каждой странице (когда мышкой синию линию перетаскиваешь что бы вписать нужные строки на нужной странице),т.е допустим на первой странице печатать "A1:J16", на второй "A17:J32", на третий "A33:J47".
...
Рейтинг: 0 / 0
Область печати для каждого листа.
    #33588902
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
SergeySЭтим задается все область печати, а мне нужно указать какие строки печатать на каждой странице (когда мышкой синию линию перетаскиваешь что бы вписать нужные строки на нужной странице),т.е допустим на первой странице печатать "A1:J16", на второй "A17:J32", на третий "A33:J47".
WorkSheet(1).PageSetup.PrintArea = "A1:J16"
WorkSheet(2).PageSetup.PrintArea = "A17:J32"
WorkSheet(3).PageSetup.PrintArea = "A33:J47"
...
Рейтинг: 0 / 0
Область печати для каждого листа.
    #33591556
SergeyS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Этим ты задаешь область печати на листах 1,2,3, а мне нужно выделить область печати "A1:J16" для первой страницы на первой листе, "A17:J32" для второй страницы на первой листе, "A33:J47" для третий страницы на первой листе. Или я что то не понимаю....
...
Рейтинг: 0 / 0
Область печати для каждого листа.
    #33591589
vkodor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ActiveSheet.PageSetup.PrintArea = "$A:$J"
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=Range("A18")
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=Range("A32")
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Область печати для каждого листа.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]