Hogyan illesszük be az oldalszámot az Excel cellájába / fejlécébe / láblécébe?
Excel fájl kinyomtatásakor előfordulhat, hogy be kell illesztenie az oldalszámokat az oldalakba, hogy a kinyomtatott fájl szép és olvasható legyen. Ebben a cikkben bemutatok néhány gyors trükköt az oldalszámok cellába, fejlécbe vagy láblécbe történő beszúrására.
Helyezze be az oldalszámot egy munkalap fejlécébe / láblécébe
Helyezze be az oldalszámot a fejlécbe / láblécbe több munkalapon
Helyezze be az oldalszámot a VBA kóddal ellátott cellába
Távolítsa el az összes oldalszámot egyszerre az Excelben
Helyezze be az oldalszámot egy munkalap fejlécébe / láblécébe
Normális esetben gyorsan beilleszthetjük az oldalszámokat a fejlécbe vagy a láblécbe a Fejléc lábléc funkciót, kérjük, tegye a következőket:
1. Lépjen a munkalapra, amelybe az oldalszámokat be szeretné illeszteni a fejlécbe vagy a láblécbe.
2. Ezután kattintson betétlap > Fejléc lábléc, és a munkalapja benne lesz Page Layout nézet, lásd a képernyőképet:
3. Kattintson arra a fejlécre vagy láblécre, ahová be szeretné illeszteni az oldalszámot, majd a Design fülre Fejléc és lábléc eszközök jelenik meg a szalagon, majd kattintson a gombra Design > Oldalszám, lásd a képernyőképet:
4. És láthatja a helyőrzőt & [Oldal] jelennek meg a kiválasztott szakaszban, majd az oldalszámok megjelenítéséhez kattintson bárhová a fejlécen vagy a láblécen kívül. Lásd a képernyőképet:
5. Most kattintással visszaállíthatja a normál nézetet Megnézem > Normál, és amikor kinyomtatja ezt a munkalapot, látni fogja, hogy az oldalszámok be lettek illesztve a kiválasztott fejlécbe vagy láblécbe.
Megjegyzések: Ha azt szeretné, hogy az oldalszámok 1/15, 2/15 formátumban jelenjenek meg, akkor ezt közvetlenül be kell írnia & [Oldal] / [oldal] / a fejléc vagy a lábléc mezőbe, lásd a képernyőképet:
Helyezze be az oldalszámot a fejlécbe / láblécbe több munkalapon
A fenti módszer segíthet az oldalszámok beillesztésébe egy munkalapba, ha be akarja illeszteni az oldalszámokat a munkafüzet összes munkalapjába, hogy az összes oldal sorrendben legyen megszámozva, kérjük, tegye a következőket:
1. Jelölje ki az összes lapfület, majd lépjen a következőre: Page Layout lapot, és kattintson a gombra Párbeszédpanel indító gomb ikon a Page Setup csoport, lásd a képernyőképet:
2. Az Page Setup párbeszédpanelen kattintson a gombra Fejléc lábléc fülön, majd kattintson a gombra Egyéni fejléc or Egyéni lábléc a kívánt fejléc vagy lábléc beállításához lásd a képernyőképet:
3. És a Fejléc or Lábléc párbeszédpanelen adja meg az oldalszámok beillesztésének helyét a Bal oldali szakasz:, Középső rész:vagy Jobb szakasz: jelölőnégyzetet, majd kattintson a gombra Oldalszám beszúrása ikon és helyőrző & [Oldal] Megjelenik. Lásd a képernyőképet:
Jegyzet: Írja be ezt & [Oldal] / [oldal] / a fejlécbe vagy a lábléc mezőbe, ha tetszik az oldalak száma 1-ként, 45-ből kettő…
4. Ezután kattintson OK > OK a párbeszédpanelek bezárásához a munkafüzet kinyomtatásakor a nyomtatás előnézetében láthatja, hogy az összes oldalszám egymás után sorrendben van elhelyezve a fejlécben vagy a láblécben.
Helyezze be az oldalszámot a VBA kóddal ellátott cellába
Könnyen beillesztheti az oldalszámokat a fejlécbe vagy a láblécbe, de ha be kell illesztenie az oldalszámokat egy munkalap cellába, akkor erre nincs közvetlen módja. A következő VBA-kód segíthet a probléma megoldásában.
1. Kattintson arra a cellára, ahol meg szeretné jeleníteni ennek a cellának az oldalszámát.
2. Tartsa lenyomva a ALT + F11 gombokat, és ez megnyitja a Microsoft Visual Basic for Applications ablak.
3. Kattints betétlap > Modulok, és illessze be a következő kódot a Modulok Ablak.
VBA kód: Helyezze be az aktuális oldalszámot egy cellába:
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. Ezután nyomja meg a gombot F5 kulcs a kód futtatásához, és ennek a cellának az oldalszáma megjelenik a kiválasztott cellában, lásd a képernyőképet:
Távolítsa el az összes oldalszámot egyszerre az Excelben
Az összes oldalszám eltávolításához hajtsa végre a következő lépéseket:
1. Jelölje ki az összes lapfület, és lépjen a Page Layout fülre, majd kattintson a gombra Párbeszédpanel indító gomb ikon a Page Setup csoport, lásd a képernyőképet:
2. Az Page Setup párbeszédpanelen kattintson a gombra Fejléc lábléc fülre, majd válassza a lehetőséget (Nincs) tól Fejléc or Lábléc legördülő lista, lásd a képernyőképet:
3. Ezután kattintson OK gombra kattintva az összes oldalszámot egyszerre eltávolítja a munkafüzetből.
A legjobb irodai hatékonyságnövelő eszközök
Töltsd fel Excel-készségeidet a Kutools for Excel segítségével, és tapasztald meg a még soha nem látott hatékonyságot. A Kutools for Excel több mint 300 speciális funkciót kínál a termelékenység fokozásához és az időmegtakarításhoz. Kattintson ide, hogy megszerezze a leginkább szükséges funkciót...
Az Office lap füles felületet hoz az Office-ba, és sokkal könnyebbé teszi a munkáját
- Füles szerkesztés és olvasás engedélyezése Wordben, Excelben és PowerPointban, Publisher, Access, Visio és Project.
- Több dokumentum megnyitása és létrehozása ugyanazon ablak új lapjain, mint új ablakokban.
- 50% -kal növeli a termelékenységet, és naponta több száz kattintással csökkenti az egér kattintását!