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

วิธีแทรกหน้าแบ่งทุกแถว x ใน Excel

อาจเป็นเรื่องง่ายและง่ายสำหรับคุณในการแทรกตัวแบ่งหน้าลงในแผ่นงาน บางครั้งจำเป็นต้องแทรกตัวแบ่งหน้าในทุกแถว X เพื่อการพิมพ์ที่เป็นระเบียบเรียบร้อยคุณจะทำอย่างไร? ที่นี่ฉันแนะนำสองวิธีในการแก้ปัญหานี้ใน Excel


แทรกหน้าแบ่งทุกแถว X ด้วย VBA ใน Excel

บางทีคุณอาจไม่คุ้นเคยกับ VBA ที่ทำงานมาก่อน แต่ด้วยขั้นตอนต่อไปนี้คุณอาจรู้วิธีเรียกใช้ VBA เพื่อแทรกตัวแบ่งหน้าทุกแถว X ที่นี่ฉันจะแทรกตัวแบ่งหน้าในทุกๆ 3 แถว

1. กด Alt + F11 เพื่อแสดง Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

2. ในหน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูล เพื่อแสดงหน้าต่างโมดูลใหม่จากนั้นคัดลอกรหัส VBA ต่อไปนี้ลงในหน้าต่างโมดูล

VBA: แทรกตัวแบ่งหน้าในทุกแถว X ในแผ่นงาน

Sub InsertPageBreaks()
'Updateby20140618
Dim xLastrow As Long
Dim xWs As Worksheet
Set xWs = Application.ActiveSheet
xRow = Application.InputBox("Row", xTitleId, "", Type:=1)
xWs.ResetAllPageBreaks
xLastrow = xWs.Range("A1").SpecialCells(xlCellTypeLastCell).Row
For i = xRow + 1 To xLastrow Step xRow
    xWs.HPageBreaks.Add Before:=xWs.Cells(i, 1)
Next
End Sub

3. คลิก วิ่ง ปุ่มและกล่องโต้ตอบจะปรากฏขึ้นเพื่อให้คุณระบุแถว X ทุกแถวที่คุณต้องการแทรกตัวแบ่งหน้าที่นี่ฉันแทรกตัวแบ่งหน้าในทุกๆ 3 แถว ดูภาพหน้าจอ:
doc-insert-page-break-x-row-1

4. คลิก OKจากนั้นมันจะแทรกตัวแบ่งหน้าในทุกแถว X

แทรกตัวแบ่งหน้าอย่างรวดเร็วทุกแถว (ที่ n) ในแผ่นงานที่ใช้งานอยู่

โดยปกติเราแทรกการแบ่งหน้าหนึ่งครั้งด้วยการคลิก เค้าโครงหน้ากระดาษ > แบ่ง > แทรกตัวแบ่งหน้า. แต่ด้วยวิธีนี้มันน่าเบื่อเกินไปที่จะแทรกการแบ่งหน้าหลายหน้าในแผ่นงานเช่นคุณต้องแทรกตัวแบ่งหน้าเดียวทุกแถวเพื่อพิมพ์แต่ละแถวในหน้าแยกกัน ไม่ต้องกังวล! Kutools สำหรับ Excel's แทรกตัวแบ่งหน้าทุกแถว ยูทิลิตี้สามารถช่วยให้คุณเก็บถาวรได้อย่างง่ายดาย!


หน้าแทรกโฆษณาแบ่งทุกแถว 3

หน้าแทรกแบทช์หลังจากทุกแถว x ด้วย Kutools for Excel

หากคุณติดตั้ง Kutools for Excel ไว้แล้วไฟล์ แยกเป็นคอลัมน์ ยูทิลิตี้สามารถช่วยคุณแบทช์แทรกตัวแบ่งหน้าหลาย ๆ หน้าหลังจากทุกแถว x พร้อมกับเก็บหัวเรื่องในแต่ละหน้าใน Excel

Kutools สำหรับ Excel - เต็มไปด้วยเครื่องมือที่จำเป็นสำหรับ Excel มากกว่า 300 รายการ เพลิดเพลินกับฟีเจอร์ทดลองใช้ฟรี 30 วันโดยไม่ต้องใช้บัตรเครดิต! ดาวน์โหลดเดี๋ยวนี้!

1. คลิก แยกเป็นคอลัมน์ บน Kutools พลัส แถบ

2. ในการเปิดกล่องโต้ตอบแยกเป็นคอลัมน์คุณต้อง:

(1) คลิกปุ่มเรียกดู  ใน ช่วงชื่อเรื่อง และเลือกแถวหัวเรื่องในช่วงที่ระบุซึ่งคุณจะแบ่งหน้าแทรกแบทช์
(2) คลิกปุ่มเรียกดู ใน ช่วงวันที่ และเลือกช่วงที่คุณจะใส่แบทช์ตัวแบ่งหน้า
(3) ใน แถวต่อหน้าที่พิมพ์ ให้ป้อนตัวเลข (ปลาย: ตัวอย่างเช่นหากคุณต้องการแทรกตัวแบ่งหน้าหลังจากทุกๆ 3 แถวโปรดป้อน 3 ลงในช่อง หากคุณต้องการให้ตัวแบ่งหน้าเฉื่อยหลังจากทุกแถวโปรดป้อน 1)
(4) ใส่ 1 ลงใน จำนวนกลุ่ม กล่อง.

3. คลิก Ok ปุ่ม

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

Kutools สำหรับ Excel - เพิ่มประสิทธิภาพ Excel ด้วยเครื่องมือที่จำเป็นมากกว่า 300 รายการ เพลิดเพลินกับฟีเจอร์ทดลองใช้ฟรี 30 วันโดยไม่ต้องใช้บัตรเครดิต! Get It Now


แทรกตัวแบ่งหน้าหลังจากทุกแถว x ด้วย Kutools for Excel

Kutools สำหรับ Excel พัฒนายูทิลิตี้แทรกหน้าแบ่งทุกแถวอื่นที่เชี่ยวชาญในการแทรกตัวแบ่งหน้าหลังจากทุกแถว x อย่างสบายใจ

Kutools สำหรับ Excel - เต็มไปด้วยเครื่องมือที่จำเป็นสำหรับ Excel มากกว่า 300 รายการ เพลิดเพลินกับฟีเจอร์ทดลองใช้ฟรี 30 วันโดยไม่ต้องใช้บัตรเครดิต! ดาวน์โหลดเดี๋ยวนี้!

1. เลือกช่วงที่คุณจะแทรกตัวแบ่งหน้าหลังจากทุกแถว x แล้วคลิก การพิมพ์ > แทรกตัวแบ่งหน้าทุกแถว บน Kutools พลัส แถบ

2. ในการเปิดกล่องโต้ตอบแทรกการแบ่งหน้าทุกแถวให้ระบุช่วงเวลาของแถวที่คุณจะแทรกตัวแบ่งหน้าแล้วคลิก Ok ปุ่ม

จากนั้นคุณจะเห็นตัวแบ่งหน้าถูกแทรกในช่วงเวลาที่ระบุของแถวพร้อมกัน

Kutools สำหรับ Excel - เพิ่มประสิทธิภาพ Excel ด้วยเครื่องมือที่จำเป็นมากกว่า 300 รายการ เพลิดเพลินกับฟีเจอร์ทดลองใช้ฟรี 30 วันโดยไม่ต้องใช้บัตรเครดิต! Get It Now


Demo: แทรกหน้าแบ่งทุกแถว x ใน Excel


Kutools สำหรับ Excel: เครื่องมือแสนสะดวกกว่า 300 รายการอยู่แค่เพียงปลายนิ้วสัมผัส! เริ่มทดลองใช้ฟรี 30 วันโดยไม่มีข้อจำกัดด้านฟีเจอร์ตั้งแต่วันนี้ Download Now!

บทความญาติ:

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

🤖 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% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
Comments (4)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hello, Why is it limited to number. If my spreadsheet has more than 1000 rows it will not complete the page breaks for all rows after that point.
Thanks
This comment was minimized by the moderator on the site
Dear extendoffice.com
I would like to send feedback about feature: Print > Insert Page Break Every Row.

VBA Code:
Sub InsertPageBreaks()
'Updateby20140618
Dim xLastrow As Long
Dim xWs As Worksheet
Set xWs = Application.ActiveSheet
xRow = Application.InputBox("Row", xTitleId, "", Type:=1)
xWs.ResetAllPageBreaks
xLastrow = xWs.Range("A1").SpecialCells(xlCellTypeLastCell).Row
For i = xRow + 1 To xLastrow Step xRow
xWs.HPageBreaks.Add Before:=xWs.Cells(i, 1)
Next
End Sub


When you use this function, you can only enter one variables is xRow.
So this feature will be almost useless because it is not flexible. Not all data start from Row 1, not to mention data usually is table and has Header row.

I think this feature should have another variable is xFirstRow, so that you can define the first row of data:
xFirstRow = Application.InputBox("First Row", xTitleId, "", Type:=1)

And the formula should be:
For i = xFirstRow + xRow + 1 To xLastrow Step xRow

Hopefully this feature will be upgraded in later versions.
Thanks,
Tuyen
This comment was minimized by the moderator on the site
Hi, Thanks a lot for the code. But when I press Cancel or x on the input box; the excel file crashes. Can you please help to resolve this issue.
This comment was minimized by the moderator on the site
Thanks a lot from Istanbul / Turkey :)
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations