По -долу ще разгледаме програма в Excel VBA че създава долен колонтитул преди отпечатване работна тетрадка.
Създайте работна книга преди събитие за печат. Кодът, добавен към събитието на Workbook BeforePrint, ще бъде изпълнен от Excel VBA, преди да отпечатате работна книга.
1. Отворете редактора на Visual Basic.
2. Щракнете двукратно върху Тази работна книга в Project Explorer.
3. Изберете Работна книга от падащия списък вляво. Изберете BeforePrint от десния падащ списък.
4. За да създадете долен колонтитул, добавете следния кодов ред към събитието Workbook BeforePrint:
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
Забележка: Обектът PageSetup съдържа всички атрибути за настройка на страницата (ляв долен колонтитул, долно поле, размер на хартията, ляво поле и т.н.) като свойства.
5. Тествайте програмата, като отпечатате работната си книга.
Резултат:
