Ak chcete do hlavičky / päty pracovného hárka vložiť určité informácie, ako je názov súboru / cesta k súboru alebo aktuálny dátum alebo číslo stránky, môžete to urobiť pomocou nižšie uvedeného kódu. Ak je to len jeden pracovný hárok, môžete to urobiť ručne, ale ak ide o viac listov alebo všetky listy v zošite, ktoré vyžadujú vyplnenie týchto informácií, môžete to urobiť pomocou jednoduchého makra / kódu vba.
Toto vzorové makro vloží hlavičku/pätu do každého pracovného hárka v aktívnom zošite. Vloží tiež úplnú cestu k zošitu.
Možnosť Explicitná čiastková vložkaHeaderFooter () Dim wsAs Worksheet Application.ScreenUpdating = False each wsInThisWorkbook.Worksheets With ws.PageSetup .LeftHeader = “Company Name:” .CenterHeader = “Page & P of & N” .RightHeader = “Printed & D & T”. „Cesta:“ & ActiveWorkbook.Path .CenterFooter = „Názov zošita: & F“ .RightFooter = „List: & A“ Koniec ďalšou sadou ws = nič Application.ScreenUpdating = True End Sub
Ak chcete tento kód skopírovať do zošita, stlačte na klávesnici kombináciu klávesov Alt + F11. Potom na ľavej strane uvidíte objekty programu Microsoft Excel. Kliknite pravým tlačidlom myši a zvoľte Vložiť. Potom kliknite na Modul a skopírujte tento kód do okna kódu vpravo.
Rozdelíme každú časť kódu -
Začneme obvyklým príkazom Dim, kde deklarujeme premenné. V tomto prípade máme pre pracovný hárok iba 1 premennú - ws. Potom zakážeme aktualizáciu obrazovky.
Teraz v cykle FOR prejdeme každým pracovným listom v zošite, ktorý obsahuje makro. Každý parameter nastavíme v nastavení stránky. & P, & N, & D, & T, & F a & A sú určité formátové kódy, ktoré je možné použiť na hlavičky a päty. & P vytlačí číslo strany. & N vytlačí celkový počet strán v dokumente. & D vytlačí aktuálny dátum. & T vytlačí aktuálny čas. & F vytlačí názov dokumentu a & A vytlačí názov karty zošita.
Na konci nastavíme pracovný hárok na nič, objekt uvoľníme a povolíme aktualizáciu obrazovky.
Tu sú 2 obrázky. 1sv jeden vám ukazuje hlavičku a 2nd jedna päta po spustení makra.
Hlavička má štítok Názov spoločnosti. Meno zatiaľ nie je zadané, pretože sme ho neprepojili so žiadnou bunkou ani nezaradili do žiadneho textu pre názov spoločnosti. Ak do kódu alebo do listu programu Excel zadáte čokoľvek a budete naň odkazovať, meno sa tu vyzdvihne a vyplní.
Stránka č. 0 ukazuje, že v súbore máme momentálne 0 strán, pretože sme tento kód spustili do prázdneho súboru. Ak spustíte tento kód v súbore obsahujúcom údaje, zobrazí sa vám číslo stránky.
Vytlačené vám poskytne dátum a čas spustenia makra spolu s textom „Vytlačené“.
V päte vám štítok Cesta ukáže cestu k aktuálnemu súboru.
Náš názov je Book1.xlsx, ktorý je v súčasnej dobe neuloženým súborom. Preto sa pre štítok Cesta nezobrazuje žiadna cesta.
Číslo hárka je vyplnené vpravo od päty.
Ak sa vám páčili naše blogy, zdieľajte ich so svojimi priateľmi na Facebooku. A tiež nás môžete sledovať na Twitteri a Facebooku.
Radi by sme vás počuli, dajte nám vedieť, ako môžeme zlepšiť, doplniť alebo inovovať našu prácu a zlepšiť ju pre vás. Napíšte nám na emailovú stránku