Как быстро очистить область печати сразу на нескольких листах в Excel?
В некоторых случаях можно задать область печати на листе для печати, но если у вас несколько листов с разными областями печати, как быстро очистить все области печати сразу на нескольких листах в Excel? Удаление вручную по одному — слишком медленный способ. Существует ли более быстрый метод?
Очистка Область печати во всей книге с помощью VBA
Очистка Область печати на нескольких листах с помощью Копировать настройки страницы ![]()
Очистка Область печати во всей книге с помощью VBA
Ниже приведён макрокод, который удаляет область печати на всех листах книги.
1. Нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.
2. В области Project – VBAProject дважды щёлкните по элементу ThisWorkbook и скопируйте приведённый ниже код VBA в правую пустую область сценария. См. снимок экрана:
VBA: Очистка Область печати во всей книге
Sub ClearPrintArea()
'UpdatebyExtendoffice20171229
Dim xSheet As Worksheet
For Each xSheet In Worksheets
xSheet.PageSetup.PrintArea = ""
Next
End Sub 
3. Нажмите клавишу F5, чтобы выполнить код. После этого все области печати в книге будут удалены.
Очистка Область печати на нескольких листах с помощью Копировать настройки страницы
Если у вас установлен Kutools для Excel, его функция «Копировать настройки страницы» поможет быстро очистить область печати на нескольких листах.
1. Выберите один лист, например, лист «random password», затем нажмите Page Layout > Область печати > Clear Область печати. См. снимок экрана:
2. Затем нажмите KUTOOLS PLUS > Printing > Копировать настройки страницы.
3. Затем в диалоговом окне Копировать настройки страницы
в разделе Copy to отображаются все листы, кроме текущего. Установите флажки для листов, с которых нужно удалить область печати;
затем перейдите в раздел Options, в списке Sheet установите флажок только напротив параметра Область печати. См. снимок экрана:
4. Нажмите кнопку Ok. Теперь область печати удалена из выбранных листов.
Демонстрация
Лучшие инструменты повышения продуктивности в Office
Раскройте весь потенциал Excel с помощью Kutools для Excel и ощутите эффективность как никогда раньше.Kutools для Excel предлагает более 300 расширенных функций для повышения продуктивности и Экономия времени.Нажмите здесь, чтобы получить нужную Вам функцию…
Office Tab добавляет в Office вкладки и значительно упрощает Вашу работу
- Включите редактирование и чтение во вкладках в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна — вместо того чтобы использовать отдельные окна.
- Повышает вашу продуктивность на 50 % и экономит сотни кликов мышью каждый день!
Все надстройки Kutools — один установщик
Kutools for Office — набор надстроек для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro, идеально подходящий командам, работающим с разными приложениями Office.
- Единый комплект— надстройки для Excel, Word, Outlook и PowerPoint + Office Tab Pro
- Один установщик, одна лицензия— настройка занимает считанные минуты (готово для MSI)
- Лучше работать вместе— оптимизированная продуктивность во всех приложениях Office
- 30-дневная полнофункциональная пробная версия— без регистрации и кредитной карты
- Лучшее соотношение цены и качества— экономия по сравнению с покупкой отдельных надстроек