ไปยังเนื้อหาหลัก

วิธีแทรกหมายเลขหน้าลงในเซลล์ / ส่วนหัว / ส่วนท้ายใน Excel

ผู้เขียน: Xiaoyang แก้ไขล่าสุด: 2024-08-20

เมื่อคุณพิมพ์ไฟล์ Excel คุณอาจต้องใส่หมายเลขหน้าลงในหน้าเพื่อให้ไฟล์ที่พิมพ์ออกมาเรียบร้อยและอ่านง่าย ในบทความนี้ฉันจะแนะนำเคล็ดลับง่ายๆในการแทรกหมายเลขหน้าลงในเซลล์ส่วนหัวหรือส่วนท้ายให้กับคุณ

แทรกหมายเลขหน้าลงในส่วนหัว / ส่วนท้ายในแผ่นงานเดียว

แทรกหมายเลขหน้าลงในส่วนหัว / ส่วนท้ายในแผ่นงานหลายแผ่น

แทรกหมายเลขหน้าลงในเซลล์ด้วยรหัส VBA

ลบหมายเลขหน้าทั้งหมดพร้อมกันใน Excel


แทรกหมายเลขหน้าลงในส่วนหัว / ส่วนท้ายในแผ่นงานเดียว

โดยปกติเราสามารถแทรกหมายเลขหน้าลงในส่วนหัวหรือส่วนท้ายได้อย่างรวดเร็วโดยใช้ไฟล์ ส่วนหัวและส่วนท้าย โปรดทำดังนี้:

1. ไปที่แผ่นงานที่คุณต้องการแทรกหมายเลขหน้าลงในส่วนหัวหรือส่วนท้าย

2. จากนั้นคลิก สิ่งที่ใส่เข้าไป > ส่วนหัวและส่วนท้ายและแผ่นงานของคุณจะอยู่ในรูปแบบ เค้าโครงหน้ากระดาษ ดูดูภาพหน้าจอ:

ภาพหน้าจอแสดงวิธีเปิดใช้งานส่วนหัวและส่วนท้ายในแผ่นงาน

3. คลิกส่วนหัวหรือส่วนท้ายที่คุณต้องการแทรกหมายเลขหน้าจากนั้นคลิก a ออกแบบ แท็บด้วย เครื่องมือส่วนหัวและส่วนท้าย จะปรากฏใน Ribbon จากนั้นคลิก ออกแบบ > เลขหน้าดูภาพหน้าจอ:

ภาพหน้าจอของการแทรกหมายเลขหน้าลงในส่วนหัวหรือส่วนท้าย

4. และคุณสามารถดูตัวยึดได้ &[หน้า] ปรากฏในส่วนที่เลือกจากนั้นคลิกที่ใดก็ได้นอกพื้นที่ส่วนหัวหรือส่วนท้ายเพื่อแสดงหมายเลขหน้า ดูภาพหน้าจอ:

ภาพหน้าจอที่แสดงหมายเลขหน้าในส่วนหัวหรือส่วนท้าย

5. ตอนนี้คุณสามารถรีเซ็ตกลับสู่มุมมองปกติได้โดยคลิก รายละเอียด > ปกติและเมื่อคุณพิมพ์แผ่นงานนี้คุณจะเห็นหมายเลขหน้าที่ถูกแทรกลงในส่วนหัวหรือส่วนท้ายที่คุณเลือก

หมายเหตุ: หากคุณต้องการให้หมายเลขหน้าที่แสดงเป็นรูปแบบ 1 จาก 15, 2 จาก 15 คุณต้องป้อนข้อมูลนี้โดยตรง & [เพจ] ของ & [เพจ] ลงในช่องฟิลด์ส่วนหัวหรือส่วนท้ายดูภาพหน้าจอ:

ภาพหน้าจอที่แสดงหมายเลขหน้าเป็นรูปแบบหน้าในส่วนหัวหรือส่วนท้าย


แทรกชื่อชีต / ชื่อไฟล์ / วันที่สร้าง / วันที่แก้ไข ... ลงในส่วนหัว / ท้ายกระดาษ / เซลล์:

ด้วยระบบเส้นทาง Kutools สำหรับ Excel's แทรกข้อมูลสมุดงาน คุณสามารถแทรกชื่อชีต ชื่อไฟล์ พาธและชื่อไฟล์ วันที่สร้าง วันที่แก้ไข และลำดับลงในเซลล์ ส่วนหัวหรือส่วนท้ายได้อย่างรวดเร็วตามที่คุณต้องการ ดาวน์โหลดและทดลองใช้ Kutools สำหรับ Excel ฟรีทันที!

ภาพหน้าจอแสดงวิธีแทรกข้อมูลสมุดงานลงในเซลล์ ส่วนหัว ส่วนท้าย...

Kutools สำหรับ Excel: ด้วย Add-in ของ Excel ที่มีประโยชน์มากกว่า 300 รายการให้ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 30 วัน ดาวน์โหลดและทดลองใช้ฟรีทันที!


แทรกหมายเลขหน้าลงในส่วนหัว / ส่วนท้ายในแผ่นงานหลายแผ่น

วิธีการด้านบนสามารถช่วยคุณในการแทรกหมายเลขหน้าลงในแผ่นงานหนึ่งแผ่นหากคุณต้องการแทรกหมายเลขหน้าลงในแผ่นงานทั้งหมดของสมุดงานเพื่อให้ทุกหน้ามีหมายเลขตามลำดับโปรดทำดังนี้:

1. เลือกแท็บแผ่นงานทั้งหมดจากนั้นไปที่ เค้าโครงหน้ากระดาษ แล้วคลิก ปุ่มเปิดกล่องโต้ตอบ ไอคอนใน ตั้งค่าหน้ากระดาษ กลุ่มดูภาพหน้าจอ:

ภาพหน้าจอของการเปิดกล่องโต้ตอบการตั้งค่าหน้ากระดาษ

2. ใน ตั้งค่าหน้ากระดาษ โปรดคลิก ส่วนหัว / ท้ายกระดาษ จากนั้นคลิกที่ ส่วนหัวที่กำหนดเอง or ส่วนท้ายที่กำหนดเอง เพื่อไปตั้งค่าส่วนหัวหรือส่วนท้ายที่คุณต้องการดูภาพหน้าจอ:

ภาพหน้าจอของการคลิกปุ่มส่วนหัวแบบกำหนดเองหรือส่วนท้ายแบบกำหนดเองตามที่คุณต้องการ

3. และใน ส่วนหัว or ฟุตบอล โปรดกำหนดตำแหน่งที่ใส่หมายเลขหน้าโดยคลิกภายในไฟล์ ส่วนซ้าย:, ส่วนศูนย์:,หรือ ส่วนขวา: ตามที่คุณต้องการจากนั้นคลิก แทรกหมายเลขหน้า ไอคอนและตัวยึดตำแหน่ง &[หน้า] ปรากฏขึ้น ดูภาพหน้าจอ:

ภาพหน้าจอของการใส่หมายเลขหน้าในตำแหน่งที่คุณต้องการ

หมายเหตุ ใส่ข้อมูลนี้ & [เพจ] ของ & [เพจ] ลงในช่องฟิลด์ส่วนหัวหรือส่วนท้ายหากคุณชอบหมายเลขหน้าที่แสดงเป็น 1 จาก 45, 2 จาก 45 ...

4. จากนั้นคลิก OK > OK เพื่อปิดกล่องโต้ตอบเมื่อคุณพิมพ์เวิร์กบุ๊กนี้ในตัวอย่างก่อนพิมพ์คุณจะเห็นหมายเลขหน้าทั้งหมดถูกแทรกลงในส่วนหัวหรือส่วนท้ายตามลำดับ


แทรกหมายเลขหน้าลงในเซลล์ด้วยรหัส VBA

เป็นเรื่องง่ายที่คุณจะแทรกหมายเลขหน้าลงในส่วนหัวหรือส่วนท้าย แต่ถ้าคุณต้องการแทรกหมายเลขหน้าลงในเซลล์เวิร์กชีตไม่มีวิธีโดยตรงที่คุณจะทำได้ รหัส VBA ต่อไปนี้อาจช่วยคุณแก้ปัญหานี้ได้

1. คลิกเซลล์ที่คุณต้องการแสดงหมายเลขหน้าของเซลล์นี้

2. กด ALT + F11 และจะเปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

3. คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางรหัสต่อไปนี้ในไฟล์ โมดูล หน้าต่าง.

รหัส VBA: ใส่หมายเลขหน้าปัจจุบันลงในเซลล์:

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. จากนั้นกด F5 คีย์เพื่อเรียกใช้รหัสนี้และหมายเลขหน้าของเซลล์นี้จะแสดงในเซลล์ที่เลือกดูภาพหน้าจอ:

ภาพหน้าจอที่แสดงหมายเลขหน้าในเซลล์หลังจากเรียกใช้โค้ด VBA


ลบหมายเลขหน้าทั้งหมดพร้อมกันใน Excel

หากต้องการลบหมายเลขหน้าทั้งหมดคุณสามารถใช้ขั้นตอนต่อไปนี้:

1. เลือกแท็บแผ่นงานทั้งหมดแล้วไปที่ไฟล์ เค้าโครงหน้ากระดาษ บนริบบิ้นจากนั้นคลิก ปุ่มเปิดกล่องโต้ตอบ ไอคอนใน ตั้งค่าหน้ากระดาษ กลุ่มดูภาพหน้าจอ:

ภาพหน้าจอแสดงวิธีเปิดกล่องโต้ตอบการตั้งค่าหน้ากระดาษ

2. ใน ตั้งค่าหน้ากระดาษ คลิกตกลง ส่วนหัว / ท้ายกระดาษ แล้วเลือก (ไม่มี) จาก ส่วนหัว or ฟุตบอล รายการแบบเลื่อนลงดูภาพหน้าจอ:

ภาพหน้าจอของการลบหมายเลขหน้าทั้งหมดในคราวเดียวจากส่วนหัวหรือส่วนท้าย

3. จากนั้นคลิก OK หมายเลขหน้าทั้งหมดจะถูกลบออกจากสมุดงานพร้อมกัน


สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน

🤖 Kutools AI ผู้ช่วย: ปฏิวัติการวิเคราะห์ข้อมูลโดยยึดตาม: การดำเนินการที่ชาญฉลาด   |  สร้างรหัส  |  สร้างสูตรที่กำหนดเอง  |  วิเคราะห์ข้อมูลและสร้างแผนภูมิ  |  เรียกใช้ฟังก์ชัน Kutools...
คุณสมบัติยอดนิยม: ค้นหา เน้น หรือระบุรายการที่ซ้ำกัน   |  ลบแถวว่าง   |  รวมคอลัมน์หรือเซลล์โดยไม่สูญเสียข้อมูล   |   รอบโดยไม่มีสูตร ...
การค้นหาขั้นสูง: VLookup หลายเกณฑ์    VLookup หลายค่า  |   VLookup ข้ามหลายแผ่น   |   การค้นหาที่ไม่ชัดเจน ....
รายการแบบเลื่อนลงขั้นสูง: สร้างรายการแบบหล่นลงอย่างรวดเร็ว   |  รายการแบบหล่นลงขึ้นอยู่กับ   |  เลือกหลายรายการแบบหล่นลง ....
ผู้จัดการคอลัมน์: เพิ่มจำนวนคอลัมน์เฉพาะ  |  ย้ายคอลัมน์  |  สลับสถานะการมองเห็นของคอลัมน์ที่ซ่อนอยู่  |  เปรียบเทียบช่วงและคอลัมน์ ...
คุณสมบัติเด่น: กริดโฟกัส   |  มุมมองการออกแบบ   |   บาร์สูตรใหญ่    สมุดงานและตัวจัดการชีต   |  ห้องสมุดทรัพยากร (ข้อความอัตโนมัติ)   |  เลือกวันที่   |  รวมแผ่นงาน   |  เข้ารหัส/ถอดรหัสเซลล์    ส่งอีเมลตามรายการ   |  ซุปเปอร์ฟิลเตอร์   |   ตัวกรองพิเศษ (กรองตัวหนา/ตัวเอียง/ขีดทับ...) ...
ชุดเครื่องมือ 15 อันดับแรก12 ข้อความ เครื่องมือ (เพิ่มข้อความ, ลบอักขระ, ... )   |   50 + แผนภูมิ ประเภท (แผนภูมิ Gantt, ... )   |   40+ ใช้งานได้จริง สูตร (คำนวณอายุตามวันเกิด, ... )   |   19 การแทรก เครื่องมือ (ใส่ QR Code, แทรกรูปภาพจากเส้นทาง, ... )   |   12 การแปลง เครื่องมือ (ตัวเลขเป็นคำ, การแปลงสกุลเงิน, ... )   |   7 ผสานและแยก เครื่องมือ (แถวรวมขั้นสูง, แยกเซลล์, ... )   |   ... และอื่น ๆ

เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา  คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...


แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!