Mai jos vom analiza un program în Excel VBA acea creează un subsol înainte de tipărire un registru de lucru.
Creați un registru de lucru BeforePrint Event. Codul adăugat în registrul de lucru BeforePrint Event va fi executat de Excel VBA înainte de a imprima un registru de lucru.
1. Deschideți Editorul Visual Basic.
2. Faceți dublu clic pe This Workbook în Project Explorer.
3. Alegeți Cartea de lucru din lista derulantă din stânga. Alegeți Înainte de imprimare din lista verticală dreaptă.
4. Pentru a crea un subsol, adăugați următoarea linie de cod în Registrul de lucru BeforePrint Event:
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
Notă: Obiectul PageSetup conține toate atributele de configurare a paginii (subsolul stânga, marginea de jos, dimensiunea hârtiei, marginea din stânga și așa mai departe) ca proprietăți.
5. Testați programul imprimând registrul de lucru.
Rezultat: