Kui soovite töölehe päisesse / jalusesse sisestada teatud teabe, näiteks faili nime / faili tee või praeguse kuupäeva või lehe numbri, saate seda teha alloleva koodi abil. Kui see on ainult üks tööleht, saate seda teha käsitsi, kuid kui see on mitu lehte või kõik töövihiku lehed, mis vajavad selle teabe täitmist, saate seda teha lihtsa vba -makro / koodi abil.
See näidismakro lisab päise/jaluse aktiivse töövihiku igale töölehele. See lisab ka töövihiku täieliku tee.
Valik Explicit Sub InsertHeaderFooter () Dim wsAs Tööleht Application.ScreenUpdating = False Iga wsInThisWorkbook.Worksheets With ws.PageSetup .LeftHeader = “Firma nimi:” .CenterHeader = “& Lehekülg & N” .RightHeader & “Printed “Path:“ & ActiveWorkbook.Path .CenterFooter = “Töövihiku nimi: & F” .RightFooter = “Leht: & A” Lõpeta järgmiste ws -ga Määra ws = Nothing Application.ScreenUpdating = Tõeline lõpp
Selle koodi töövihikusse kopeerimiseks vajutage klaviatuuril klahve Alt + F11. Seejärel näete vasakul küljel Microsoft Exceli objekte. Paremklõpsake ja valige Lisa. Seejärel klõpsake moodulil ja kopeerige see kood paremal asuvasse koodiaknasse.
Lõhustame koodi iga osa -
Alustame tavalisest Dim -lausest, kus deklareerime muutujad. Sel juhul on meil töölehe jaoks ainult 1 muutuja - ws. Seejärel keelame ekraani värskendamise.
Nüüd, ringis FOR, loeme läbi iga töövihiku töölehe, mis sisaldab makro. Ja me seadistame iga parameetri lehe seadistuses. & P, & N, & D, & T, & F ja & A on teatud vormingukoodid, mida saab päistele ja jalustele rakendada. & P prindib lehe numbri. & N prindib dokumendi lehekülgede koguarvu. & D prindib praeguse kuupäeva. & T prindib praeguse aja. & F prindib dokumendi nime ja & A prindib töövihiku vahekaardi nime.
Lõpuks seadisime töölehe tühjaks ja vabastame objekti ning lubame ekraani värskendamise.
Siin on 2 pilti. 1st üks näitab päist ja 2nd üks jalus pärast makro käivitamist.
Päises on silt Ettevõtte nimi. Nime pole veel sisestatud, kuna me pole seda ühegi lahtriga linkinud ega ettevõtte nime teksti sisestanud. Kui sisestate koodi või Exceli lehele midagi ja viitate sellele, siis võetakse nimi üles ja täidetakse siin.
Lehekülg # / 0 näitab, et praegu on meil failis 0 lehte, kuna oleme selle koodi käivitanud tühjale failile. Kui käivitate selle koodi andmeid sisaldavas failis, näitab see teile lehe numbrit.
Printed annab makro kuupäeva ja kellaaja koos tekstiga „Printed”.
Jalusel näitab silt Path praeguse faili teed.
Meie failinimi on Book1.xlsx, mis on praegu salvestamata fail. Seega ei ilmu tee sildi jaoks teed.
Lehe number on jalust paremal.
Kui teile meeldisid meie ajaveebid, jagage seda oma sõpradega Facebookis. Samuti saate meid jälgida Twitteris ja Facebookis.
Tahaksime sinust kuulda, andke meile teada, kuidas saaksime oma tööd täiustada, täiendada või uuendada ning muuta see teie jaoks paremaks. Kirjuta meile meilisaidile