Jos haluat lisätä laskentataulukon ylä- tai alatunnisteeseen tiettyjä tietoja, kuten tiedostonimen / tiedoston polun tai nykyisen päivämäärän tai sivunumeron, voit tehdä sen alla olevan koodin avulla. Jos se on vain yksi laskentataulukko, voit tehdä sen manuaalisesti, mutta jos useat taulukot tai kaikki työkirjan arkit täyttävät nämä tiedot, voit tehdä tämän käyttämällä yksinkertaista vba -makroa / -koodia.
Tämä esimerkkimakro lisää otsikon/alatunnisteen jokaiseen aktiivisen työkirjan laskentataulukkoon. Se lisää myös työkirjan koko polun.
Vaihtoehto Explicit Sub InsertHeaderFooter () Dim wsAs -laskentataulukkosovellus.ScreenUpdating = False Jokainen wsInThisWorkbook.Worksheets With ws.PageSetup .LeftHeader = “Yrityksen nimi:” .CenterHeader = “& S of & N” .RightHeader & ”Printed "Polku:" & ActiveWorkbook.Path .CenterFooter = "Työkirjan nimi: & F" .RightFooter = "Sheet: & A" Lopeta seuraavilla ws Set ws = Nothing Application.ScreenUpdating = True End Sub
Kopioi tämä koodi työkirjaasi painamalla näppäimistön näppäinyhdistelmää Alt + F11. Sitten näet vasemmalla puolella Microsoft Excel -objektit. Napsauta hiiren kakkospainikkeella ja valitse Lisää. Napsauta sitten Moduuli ja kopioi tämä koodi oikealla olevaan koodi -ikkunaan.
Hajotetaan koodin jokainen osa -
Aloitamme tavallisella Dim -lausekkeella, jossa ilmoitamme muuttujat. Tässä tapauksessa laskentataulukolle on vain yksi muuttuja - ws. Sitten poistamme näytön päivityksen käytöstä.
Nyt kierrämme FOR -silmukassa jokaisen työkirjan laskentataulukon, joka sisältää makron. Ja asetamme jokaisen parametrin sivun asetuksissa. & P, & N, & D, & T, & F ja & A ovat tiettyjä muotokoodeja, joita voidaan soveltaa ylä- ja alatunnisteisiin. & P tulostaa sivunumeron. & N tulostaa asiakirjan sivujen kokonaismäärän. & D tulostaa nykyisen päivämäärän. & T tulostaa nykyisen ajan. & F tulostaa asiakirjan nimen ja & A tulostaa työkirjan välilehden nimen.
Lopuksi asetamme laskentataulukon tyhjäksi ja vapautamme objektin ja otamme näytön päivityksen käyttöön.
Tässä on 2 kuvaa. 1st yksi näyttää otsikon ja 2toinen yksi alatunniste makron suorittamisen jälkeen.
Ylätunnisteessa on yrityksen nimi. Nimeä ei ole vielä syötetty, koska emme ole linkittäneet sitä mihinkään soluun tai syöttäneet mitään yrityksen nimen tekstiin. Jos syötät jotain koodiin tai Excel -taulukkoon ja viitat siihen, nimi haetaan ja täytetään täällä.
Sivu # 0 osoittaa, että tiedostossa on tällä hetkellä 0 sivua, koska olemme suorittaneet tämän koodin tyhjälle tiedostolle. Jos suoritat tämän koodin tiedostoa sisältävässä tiedostossa, se näyttää sinulle sivunumeron.
Tulostettu näyttää päivämäärän ja kellonajan, jolloin makro suoritettiin yhdessä tekstin "Tulostettu" kanssa.
Alatunnisteessa Polku -tarra näyttää nykyisen tiedoston polun.
Tiedostonimemme on Book1.xlsx, joka on tällä hetkellä tallentamaton tiedosto. Näin ollen Polku -tunnisteelle ei näy polkua.
Arkin numero on alatunnisteen oikealla puolella.
Jos pidit blogistamme, jaa se ystävillesi Facebookissa. Voit myös seurata meitä Twitterissä ja Facebookissa.
Haluaisimme kuulla sinusta, kerro meille, kuinka voimme parantaa, täydentää tai innovoida työtämme ja parantaa sitä sinulle. Kirjoita meille sähköpostitse