Как добавить цвет фона в заголовки или нижние колонтитулы на листе Excel при печати?
При работе в Excel добавление заголовков или нижних колонтитулов улучшает профессиональный вид ваших распечатанных документов, включая важную информацию, такую как номера страниц, имена файлов или логотипы компаний. Хотя встроенные функции Excel позволяют вставлять текст и изображения в заголовки и нижние колонтитулы, которые появятся при печати, вы можете обнаружить, что хотите выделить эти разделы с помощью цвета фона для улучшения читаемости или брендинга. Однако в настоящее время Excel не предоставляет прямой возможности применить цвет фона к областям заголовка или нижнего колонтитула в распечатке. Это может быть разочаровывающим, если вы хотите визуально отделить эти разделы от ваших данных при печати. Ниже вы найдете несколько практических решений для имитации цветного заголовка или нижнего колонтитула в ваших распечатках Excel, подходящих для разных потребностей и уровней технической подготовки.
Добавление цвета фона в заголовок или нижний колонтитул с помощью заливки цветом
Добавление цвета фона в заголовок и нижний колонтитул с помощью VBA
Добавление цвета фона в заголовок или нижний колонтитул с помощью заливки цветом
Этот подход включает форматирование ячеек рабочего листа для визуального имитирования цветного заголовка или нижнего колонтитула. Поскольку фактические заголовки и нижние колонтитулы, созданные через Разметка страницы, не поддерживают цвет фона, форматирование верхних и/или нижних строк обеспечивает эффективную альтернативу. Этот метод лучше всего подходит, когда вашей основной целью является усиление визуального разделения или бренда печатных листов, и когда содержание вашего заголовка/нижнего колонтитула может быть показано в строках рабочего листа, а не в истинных печатных заголовках/нижних колонтитулах.
Ограничения этого метода включают невозможность использования динамических полей заголовка/нижнего колонтитула (например, номеров страниц) и необходимость вручную повторять эти шаги для каждого листа.
1. Нажмите Разметка страницы > Параметры страницы.
Прежде чем продолжить, важно установить все поля равными 0, чтобы максимизировать используемое пространство рабочего листа и гарантировать, что цветные области будут расположены заподлицо сверху и/или снизу каждой напечатанной страницы. Это помогает создать иллюзию настоящего фона заголовка или нижнего колонтитула при печати документа.
2. В окне Параметры страницы диалогового окна перейдите на вкладку Поля и введите 0 в поле Верхнее, Заголовок, Нижнее, и Нижний колонтитул текстовые поля. Это гарантирует, что не будет зарезервировано место для встроенных заголовков и нижних колонтитулов Excel, и помещает содержимое вашего рабочего листа прямо вверху и внизу напечатанной страницы.
3. Нажмите OK для применения изменений полей. Выберите первую строку вашего рабочего листа (эта строка будет визуально действовать как ваш заголовок), затем перейдите в Главная > Объединить и центрировать чтобы объединить все столбцы в этой строке в одну ячейку. Это предоставляет большую область для вашего текста заголовка и цвета фона.
Совет: Для документов с несколькими столбцами убедитесь, что вы выбрали и объединили правильный диапазон ячеек, чтобы охватить всю область данных.
4. С выбранными объединенными ячейками нажмите кнопку Цвет заливки (значок ведра с краской) на вкладке Главная и выберите желаемый цвет фона из палитры. Это добавит заметную цветную полосу в верхней части вашего листа, имитируя фон заголовка.
5. Если вы также хотите добавить цветной нижний колонтитул, прокрутите до последней строки вашего диапазона печати, выберите её и повторите шаги объединения и заливки цветом, чтобы создать цветную область внизу страницы.
Для достижения наилучших результатов рассмотрите возможность добавления пользовательского текста заголовка или нижнего колонтитула непосредственно в эти цветные и объединенные ячейки. Вы можете настроить размер шрифта, выравнивание или форматирование по мере необходимости, чтобы соответствовать вашим требованиям к печати. Имейте в виду, что этот метод определяет заголовок и нижний колонтитул только в видимой области рабочего листа. Если ваш документ занимает несколько страниц, вам может понадобиться повторить эти шаги форматирования для каждой напечатанной страницы вручную, или использовать функцию "Строки для повторения сверху" в Параметрах страницы только для заголовков.
Теперь, когда вы перейдете в Файл > Печать или нажмите Ctrl + P, вы должны увидеть цветную полосу в верхней (и/или нижней) части страницы предварительного просмотра, которая служит имитацией фона для вашего заголовка или нижнего колонтитула.
Если цвет не отображается должным образом в режиме предварительного просмотра печати, проверьте, совпадают ли настройки принтера и диапазон рабочего листа, и убедитесь, что область печати покрывает ваши отформатированные строки.
Добавление цвета фона в заголовок и нижний колонтитул с помощью VBA
Для более сложных рабочих листов или при работе с несколькими страницами и желании автоматизировать создание цветных областей заголовка и нижнего колонтитула на каждой напечатанной странице можно использовать макрос VBA для быстрого добавления этих эффектов по всему листу. Это решение VBA добавляет предопределенные цветные строки в начале и конце каждого диапазона страниц, имитируя вид цветных заголовков и нижних колонтитулов в распечатке.
Этот подход особенно подходит для больших рабочих листов, старых отчетов или ситуаций, где требуется единообразное оформление на многих страницах. Однако он требует включения функциональности макросов и некоторого опыта работы с интерфейсом VBA. Обратите внимание, что это всё ещё не влияет на фактический заголовок/нижний колонтитул Excel, но работает путем изменения содержимого рабочего листа непосредственно для имитации печати.
1. Нажмите Alt + F11, чтобы открыть окно редактора Microsoft Visual Basic for Applications. Если вы используете VBA впервые, вам может понадобиться сначала включить вкладку Разработчик.
2. В окне VBA нажмите Вставка > Модуль. В области кода нового модуля скопируйте и вставьте следующий код:
VBA: Добавление цвета фона в заголовок и нижний колонтитул
Sub FakeHeaderFooter()
'UpdatebyExtendoffice20180628 Dim I, J As Long Dim xRg As Range Dim xRow, xCol As Long Dim xRows, xCols As Long Dim xDivRow, xDivCol As Long Dim xTopArr, xButtArr As Variant Dim PageSize1, PageSize2 As Integer On Error Resume Next xTopArr = Array("Top Left", "", "", "Top Center", "", "", "", "")
xButtArr = Array("Bottom Left", "", "", "Bottom Center", "", "", "", "")
PageSize1 =46 PageSize2 =8 With ActiveSheet.PageSetup .TopMargin = Application.InchesToPoints(0)
.BottomMargin = Application.InchesToPoints(0)
.HeaderMargin = Application.InchesToPoints(0)
.FooterMargin = Application.InchesToPoints(0)
.BlackAndWhite = False End With Set xRg = ActiveSheet.UsedRange If xRg Is Nothing Then Exit Sub xRows = xRg(xRg.Count).Row xCols = xRg(xRg.Count).Column If xRows <46 Then xRows =46 If xCol <8 Then xCol =8 xDivRow = Int(xRows / PageSize1)
xDivCol = Int(xCols / PageSize2)
If ((xRows Mod PageSize1) >0) And (xDivRow <>0) Then xDivRow = xDivRow +1 If ((xCols Mod PageSize2) >0) And (xDivCol <>0) Then xDivCol = xDivCol +1 If xDivRow =0 Then xDivRow =1 If xDivCol =0 Then xDivCol =1 Set xRg = Range("A1").Resize(xDivRow * PageSize1, xDivCol * PageSize2)
xRow =1 xCol =1 Cells.PageBreak = xlPageBreakNone For I =1 To xDivRow * PageSize1 Step PageSize1 +1 For J =1 To xDivCol * PageSize2 Step PageSize2 Cells(I, J).Resize(1, PageSize2) = xTopArr Cells(I, J).Resize(1, PageSize2).Interior.ColorIndex =34 Cells(I + PageSize1, J).Resize(1, PageSize2) = xButtArr Cells(I + PageSize1, J).Resize(1, PageSize2).Interior.ColorIndex =34 Rows(I + PageSize1 +1).PageBreak = xlManual Columns(J + PageSize2).PageBreak = xlManual Next NextEnd Sub
3. Нажмите F5 или нажмите кнопку Выполнить в панели инструментов VBA для выполнения кода. Макрос автоматически вставит цветные строки в верхней и нижней части каждого диапазона страниц, определенного параметрами PageSize1 (количество строк на странице) и PageSize2 (количество столбцов на странице). Первая и 47-я строки на каждой "странице" будут заполнены указанным цветом и предопределенным текстом, которые вместе будут отображаться как "фальшивый" заголовок и нижний колонтитул при переходе в режим предварительного просмотра печати или при печати вашего рабочего листа.
Вы можете дополнительно настроить этот макрос в соответствии с вашими требованиями. Например, чтобы изменить содержимое заголовка или нижнего колонтитула, отрегулируйте текст в этих строках:
xTopArr = Array("Верхний левый", "", "", "По центру", "", "", "", "")
xButtArr = Array("Нижний левый", "", "", "Нижний центр", "", "", "", "")
Если вы хотите другой цвет фона, измените значение ColorIndex здесь:
Cells(I, J).Resize(1, PageSize2).Interior.ColorIndex =34
Cells(I + PageSize1, J).Resize(1, PageSize2).Interior.ColorIndex =34
Макрос использует стандартные индексы цветов Excel. Чтобы просмотреть разные цвета, обратитесь к справке Microsoft по ColorIndex или используйте палитру цветов Excel, чтобы определить значения, соответствующие вашему бренду или предпочтениям дизайна.
Примечание: Сохраните свою работу перед запуском макросов VBA, так как действия нельзя отменить с помощью стандартной функции Отмена. Кроме того, поскольку этот макрос изменяет содержимое рабочего листа, убедитесь, что область печати установлена правильно и настройте параметры PageSize1 и PageSize2 в соответствии с вашими конкретными потребностями бумаги и макета. Этот метод добавит дополнительные строки и может сместить существующие данные вниз, поэтому проверьте свой макет после запуска макроса.
Если вы сталкиваетесь с проблемами, когда цветные области не отображаются должным образом при печати (например, цвет отсутствует или обрезается), проверьте, что печать цветного фона включена в расширенных настройках вашего принтера, и убедитесь, что область печати вашего рабочего листа установлена правильно. Оба подхода — заливка цветом и VBA — требуют осторожности в отношении объединенных ячеек и настройки области печати, так как неправильная настройка может привести к несоответствию или частичной закраске.
Выберите решение, которое лучше всего соответствует вашей версии Excel, макету страницы, сложности ваших потребностей заголовка/нижнего колонтитула и тому, является ли для вас важнее автоматизация или контроль над дизайном. Цветизация заголовка/нижнего колонтитула лучше всего подходит для презентаций, титульных страниц или фирменных распечаток, когда фактические поля заголовка/нижнего колонтитула не должны обновляться динамически на страницах.
Лучшие инструменты для повышения продуктивности в 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-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек