Прескочи на основното съдържание

Как да задам област за печат на няколко работни листа едновременно в Excel?

Автор: Слънце Последна промяна: 2014-09-05

По принцип можете просто да зададете област за печат в един работен лист наведнъж в Excel, но ако искате да зададете една и съща област за печат в няколко работни листа в работна книга, има ли бързи начини за решаване на проблема? Сега ще ви разкажа някои подробности за бързите начини за задаване на една и съща област за печат в няколко работни листа.

Задайте същата област за печат на множество работни листове с Kutools за Excel

Задайте една и съща област за печат на няколко работни листа с VBA


стрелка син десен балон Задайте същата област за печат на множество работни листове с Kutools за Excel

Kutools за Excel isa удобна добавка за Excel и нейната Копиране на настройките на страницата може да ви помогне бързо да зададете област за печат на множество работни листове.

Kutools за Excel включва повече от 300 удобни инструмента на Excel. Безплатно изпробване без ограничение за 30 дни. Махни го сега

1. Изберете областта за печат в един от работните листове и след това щракнете Page Layout > Печатната зона > Задайте област за печат. Вижте екранна снимка:

doc-set-площ за печат-1

2. кликване Enterprise > Инструменти за печат > Копиране на настройките на страницата. Вижте екранна снимка:

doc-set-площ за печат-2

3. В Копиране на настройките на страницата междувременно проверете работните листове, на които искате да зададете област за печат, след което щракнете Лист и проверете Печат област само в Настройка на страницата раздел. Вижте екранна снимка:

doc-set-площ за печат-3

4. След това кликнете Ok за да затворите диалоговия прозорец и щракнете Да в следващите дни Kutools за Excel предупредителен диалогов прозорец, тогава маркираните работни листове се задават с едни и същи области за печат наведнъж.

doc-set-площ за печат-4

Щракнете тук за повече подробности относно настройката на страницата за копиране.


стрелка син десен балон Задайте една и съща област за печат на няколко работни листа с VBA

Ако се интересувате от VBA, можете да опитате следния VBA.

1. Изберете диапазон, който искате да зададете като област за печат в един от работните листове, и натиснете Alt + F11 за да отворите Microsoft Visual Basic за приложения прозорец.

2. кликване Модули > Поставете за вмъкване на 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. кликване Модули > Поставете за да вмъкнете модулен прозорец и копирайте 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

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations