Як друкувати колонтитул на останній сторінці тільки в Excel?
За замовчуванням із вбудованим Верхній і нижній колонтитул Функція Excel, ви можете легко додавати нижні колонтитули внизу кожної друкованої сторінки на аркуші. Якщо ви хочете додати нижній колонтитул лише до останньої надрукованої сторінки аркуша, як це зробити? Цей посібник містить сценарій VBA, який допоможе вам виконати це завдання крок за кроком.
Друкувати нижній колонтитул на останній сторінці лише з кодом VBA
Запустіть наведений нижче код VBA, щоб надрукувати власний нижній колонтитул на останній надрукованій сторінці лише в Excel.
1. Відкрийте робочий аркуш, який ви хочете надрукувати, з власним нижнім колонтитулом, який відображається лише на останній надрукованій сторінці.
2 Натисніть кнопку інший + F11 ключі, щоб відкрити Microsoft Visual Basic для додатків вікна.
3 В Microsoft Visual Basic для додатків вікна, натисніть Insert > Модулі. Потім скопіюйте наступний код VBA в Модуль (Код) вікна.
Код VBA: друкувати нижній колонтитул лише на останній сторінці
Sub SetFooterOnLastPage()
'Updated by Extendoffice 20221024
Dim xCount As Long
Dim xWSh
xCount = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
Set xWSh = Application.ActiveSheet
With Application.ActiveSheet
.PageSetup.RightFooter = ""
If xCount > 1 Then
.PrintOut From:=1, To:=xCount - 1
End If
.PageSetup.RightFooter = "Type your footer information here"
.PrintOut From:=xCount, To:=xCount
End With
End Sub
примітки: У коді замініть цей вміст "Введіть тут інформацію про нижній колонтитул" з інформацією про ваш нижній колонтитул.
4 Натисніть кнопку F5 клавіша для запуску коду.
Тоді активний робочий аркуш буде надруковано зі вставленням спеціального нижнього колонтитула лише на останній надрукованій сторінці.
Найкращі інструменти продуктивності офісу
Покращуйте свої навички Excel за допомогою Kutools для Excel і відчуйте ефективність, як ніколи раніше. Kutools для Excel пропонує понад 300 додаткових функцій для підвищення продуктивності та економії часу. Натисніть тут, щоб отримати функцію, яка вам найбільше потрібна...
Вкладка Office Передає інтерфейс із вкладками в Office і значно полегшує вашу роботу
- Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
- Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
- Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!
