Zemāk mēs apskatīsim programmu Excel VBA ka pirms drukāšanas izveido kājeni darba burtnīca.
Izveidojiet darbgrāmatu pirms notikuma drukāšanas. Pirms darbgrāmatas drukāšanas darbgrāmatai pirms drukāšanas pievienotais kods tiks izpildīts programmā Excel VBA.
1. Atveriet Visual Basic redaktoru.
2. Veiciet dubultklikšķi uz Šī darbgrāmata Project Explorer.
3. Kreisajā nolaižamajā sarakstā izvēlieties Darbgrāmata. Labajā nolaižamajā sarakstā izvēlieties BeforePrint.
4. Lai izveidotu kājeni, pievienojiet darbgrāmatai BeforePrint notikumam šādu koda rindiņu:
ActiveSheet.PageSetup.LeftFooter = ActiveWorkbook.FullName
Piezīme. PageSetup objektā kā rekvizīti ir visi lapas iestatīšanas atribūti (kreisā kājene, apakšējā mala, papīra izmērs, kreisā mala utt.).
5. Pārbaudiet programmu, izdrukājot savu darbgrāmatu.
Rezultāts:
