Як встановити область друку для кількох аркушів одночасно в Excel?

Загалом, ви просто можете встановити область друку на одному аркуші за раз у Excel, але якщо ви хочете встановити одну і ту ж область друку на декількох аркушах книги, чи є швидкі способи її вирішення? Тепер я розповім вам детальну інформацію про швидкі способи встановлення однакової області друку на кількох робочих аркушах.

Встановіть одну і ту ж область друку для кількох аркушів за допомогою Kutools для Excel

Встановіть одну область друку для декількох аркушів за допомогою VBA

---

Встановіть одну і ту ж область друку для кількох аркушів за допомогою Kutools для Excel

Kutools для Excel iЗручна надбудова Excel та її Копіювати налаштування сторінки Ця функція може допомогти вам швидко встановити область друку на кілька аркушів.

Kutools для Excel включає більше 300 зручних інструментів Excel. Безкоштовно спробувати без обмежень протягом 30 днів. Отримати зараз

1. Виберіть область друку на одному з аркушів і натисніть макет сторінки > Область друку > Встановити область друку. Дивіться знімок екрана:

2. клацання підприємство > Інструменти друку > Копіювати налаштування сторінки. Дивіться знімок екрана:

3 В Копіювати налаштування сторінки діалоговому вікні, перевірте тим часом аркуші, для яких потрібно встановити область друку, а потім натисніть лист та перевірте Друк області тільки в Налаштування сторінки розділ. Дивіться знімок екрана:

4 Потім натисніть Ok щоб закрити діалогове вікно, і натисніть Так в майбутньому Kutools для Excel попереджувальне діалогове вікно, тоді перевірені робочі аркуші встановлюються з однаковими областями друку одночасно.

Клацніть тут, щоб отримати докладнішу інформацію про налаштування сторінки копіювання.

---

Встановіть одну область друку для декількох аркушів за допомогою VBA

Якщо вас цікавить VBA, ви можете спробувати наступну VBA.

1. Виберіть діапазон, який ви хочете встановити як область друку, на одному з аркушів і натисніть Alt + F11 ключі, щоб відкрити Microsoft Visual Basic для програм вікна.

2. клацання Модулі > Insert вставити a Модулі вікно та скопіюйте наведений нижче VBA у вікно.

VBA: Встановіть область друку у всій книзі.

Sub SetGlobalPrintArea()
'Updateby20140827
Dim xWs As Worksheet
Dim WorkRng As Range
Set WorkRng = Application.Selection
For Each xWs In Application.ActiveWorkbook.Worksheets
    xWs.PageSetup.PrintArea = WorkRng.Address
Next
End Sub

3. клацання прогін , щоб запустити VBA, і тоді всі аркуші книги будуть встановлені з однаковими областями друку.

Порада:

Якщо ви хочете встановити область друку на вибраних робочих аркушах, ви можете зробити наступне:

1. Виберіть діапазон, який ви хочете встановити як область друку, а потім виберіть робочі аркуші, натиснувши Ctrl потрібні клавіші, а потім натисніть Alt + F11 ключі, щоб відкрити Microsoft Visual Basic для програм вікна.

2. клацання Модулі > Insert щоб вставити вікно модуля та скопіюйте наведений нижче VBA у вікно.

VBA: Встановіть область друку на вибраних робочих аркушах.

Sub SetSelectWsPrintArea()
'Updateby20140827
Dim xWs As Worksheet
Dim WorkRng As Range
Set WorkRng = Application.Selection
For Each xWs In Application.ActiveWindow.SelectedSheets
    xWs.PageSetup.PrintArea = WorkRng.Address
Next
End Sub