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 pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
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!
