Kako vstaviti številko strani v celico / glavo / nogo v Excelu?
Ko tiskate datoteko Excel, boste morda morali na strani vstaviti številke strani, da bo natisnjena datoteka lepo in berljiva. V tem članku bom predstavil nekaj hitrih trikov za vstavljanje številk strani v celico, glavo ali nogo.
V glavo / nogo na enem delovnem listu vstavite številko strani
Številko strani vstavite v glavo / nogo na več delovnih listov
V celico s kodo VBA vstavite številko strani
V Excelu odstranite vse številke strani hkrati
V glavo / nogo na enem delovnem listu vstavite številko strani
Običajno lahko številke strani hitro vstavimo v glavo ali nogo s pomočjo Glava in noga funkcijo, naredite naslednje:
1. Pojdite na delovni list, v katerega želite vstaviti številke strani v glavo ali nogo.
2. Nato kliknite Vstavi > Glava in noga, in vaš delovni list bo v Postavitev strani pogled, glej posnetek zaslona:
3. Kliknite glavo ali nogo, kamor želite vstaviti številko strani, in nato a Oblikovanje zavihek z Orodja za glave in noge se prikaže na traku, nato kliknite Oblikovanje > Številka strani, glej posnetek zaslona:
4. In lahko vidite nadomestni znak & [Stran] v izbranem odseku, nato kliknite kjer koli zunaj območja glave ali noge, da prikažete številke strani. Oglejte si posnetek zaslona:
5. Zdaj se lahko s klikom vrnete v običajni pogled Poglej > Normal, in ko natisnete ta delovni list, boste videli, da so številke strani vstavljene v glavo ali nogo, ki ste jo izbrali.
Opombe: Če želite, da so številke strani prikazane v obliki 1 od 15, 2 od 15, morate to neposredno vnesti & [Stran] od & [Strani] v polju z glavo ali nogo si oglejte posnetek zaslona:
Številko strani vstavite v glavo / nogo na več delovnih listov
Zgornja metoda vam lahko pomaga pri vstavljanju številk strani na en delovni list. Če želite vstaviti številke strani v vse delovne liste delovnega zvezka, da bodo vse strani oštevilčene v zaporednem vrstnem redu, naredite naslednje:
1. Izberite vse zavihke lista in nato pojdite na Postavitev strani in kliknite Gumb za zagon pogovornega okna ikona v Priprava strani skupina, glej posnetek zaslona:
2. v Priprava strani pogovorno okno, kliknite Glava / noga kartico in nato kliknite Glava po meri or Noga po meri če želite nastaviti glavo ali nogo, ki jo želite, si oglejte posnetek zaslona:
3. In v Glava or Noga v pogovornem oknu določite mesto, kamor se vstavijo številke strani, tako da kliknete znotraj Levi del:, Osrednji del:ali Desni del: in nato kliknite Vstavi številko strani ikono in rezervirano mesto & [Stran] se prikaže. Oglejte si posnetek zaslona:
Opomba: Vnesite to & [Stran] od & [Strani] v polje glave ali noge, če so vam všeč številke strani, prikazane kot 1 od 45, 2 od 45 ...
4. Nato kliknite OK > OK da zaprete pogovorna okna, ko med tiskanjem tega delovnega zvezka v predogledu tiskanja vidite, da so vse številke strani vstavljene v glavo ali nogo v zaporednem vrstnem redu.
V celico s kodo VBA vstavite številko strani
Številke strani lahko enostavno vstavite v glavo ali nogo, če pa morate številke strani vstaviti v celico delovnega lista, ni neposrednega načina, da to storite. Naslednja koda VBA vam lahko pomaga rešiti to težavo.
1. Kliknite celico, v kateri želite prikazati številko strani te celice.
2. Držite tipko ALT + F11 in odpre tipko Microsoft Visual Basic za aplikacije okno.
3. Kliknite Vstavi > Moduliin prilepite naslednjo kodo v Moduli Okno.
Koda VBA: V celico vstavite številko trenutne strani:
Sub pagenumber()
'updateby Extendoffice 20160506
Dim xVPC As Integer
Dim xHPC As Integer
Dim xVPB As VPageBreak
Dim xHPB As HPageBreak
Dim xNumPage As Integer
xHPC = 1
xVPC = 1
If ActiveSheet.PageSetup.Order = xlDownThenOver Then
xHPC = ActiveSheet.HPageBreaks.Count + 1
Else
xVPC = ActiveSheet.VPageBreaks.Count + 1
End If
xNumPage = 1
For Each xVPB In ActiveSheet.VPageBreaks
If xVPB.Location.Column > ActiveCell.Column Then Exit For
xNumPage = xNumPage + xHPC
Next
For Each xHPB In ActiveSheet.HPageBreaks
If xHPB.Location.Row > ActiveCell.Row Then Exit For
xNumPage = xNumPage + xVPC
Next
ActiveCell = "Page " & xNumPage & " of " & Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
End Sub
4. Nato pritisnite F5 tipko za zagon te kode in v izbrani celici se prikaže številka strani te celice, glejte posnetek zaslona:
V Excelu odstranite vse številke strani hkrati
Če želite odstraniti vse številke strani, lahko uporabite naslednje korake:
1. Izberite vse zavihke lista in pojdite na Postavitev strani na traku, nato kliknite Gumb za zagon pogovornega okna ikona v Priprava strani skupina, glej posnetek zaslona:
2. v Priprava strani pogovorno okno, kliknite Glava / noga in nato izberite (Brez) Iz Glava or Noga spustni seznam, glej posnetek zaslona:
3. Nato kliknite OK gumba se iz delovnega zvezka naenkrat odstranijo vse številke strani.
Najboljša orodja za pisarniško produktivnost
Kutools za Excel rešuje večino vaših težav in poveča vašo produktivnost za 80%
- Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
- Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
- Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
- Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
- Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
- Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
- Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
- Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
- Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2021 in 365. Podpira vse jezike. Enostavna uvedba v vašem podjetju ali organizaciji. 30-dnevna brezplačna preizkusna različica vseh funkcij. 60-dnevna garancija vračila denarja.
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50%in vsak dan zmanjša na stotine klikov miške za vas!
