Note: The other languages of the website are Google-translated. Back to English

วิธีแบ่งข้อมูลออกเป็นหลายแผ่นตามจำนวนแถวใน Excel

ตัวอย่างเช่นฉันมีช่วงของรายการข้อมูลตอนนี้ฉันต้องการแบ่งออกเป็นหลายแผ่นงานตามจำนวนแถวในตัวอย่างนี้ฉันจะแบ่งมันออกทุกๆ 5 แถว (ดูภาพหน้าจอต่อไปนี้) มีวิธีใดบ้างที่จะช่วยเราแก้ปัญหานี้ได้อย่างรวดเร็ว ที่นี่ฉันจะแนะนำสองเทคนิคเพื่อให้คุณทำมันได้อย่างง่ายดาย


doc-split-data-by-row1


-2



doc-split-data-by-row2
doc-split-data-by-row3
doc-split-data-by-row4
doc-split-data-by-row5

แยกข้อมูลออกเป็นหลายแผ่นตามแถวนับด้วยรหัส VBA

แบ่งข้อมูลออกเป็นหลายแผ่นตามแถวนับด้วย Kutools for Excel

แท็บ Office เปิดใช้งานการแก้ไขและเรียกดูแบบแท็บใน Office และทำให้งานของคุณง่ายขึ้นมาก ...
Kutools สำหรับ Excel แก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%
  • ใช้ซ้ำอะไรก็ได้: เพิ่มสูตรที่ใช้มากที่สุดหรือซับซ้อนแผนภูมิและสิ่งอื่นใดในรายการโปรดของคุณและนำกลับมาใช้ใหม่ได้อย่างรวดเร็วในอนาคต
  • คุณสมบัติข้อความมากกว่า 20 รายการ: แยกหมายเลขจากสตริงข้อความ แยกหรือลบบางส่วนของข้อความ แปลงตัวเลขและสกุลเงินเป็นคำภาษาอังกฤษ
  • ผสานเครื่องมือ: สมุดงานและแผ่นงานหลายเล่มเป็นหนึ่งเดียว ผสานหลายเซลล์ / แถว / คอลัมน์โดยไม่สูญเสียข้อมูล รวมแถวและผลรวมที่ซ้ำกัน
  • แยกเครื่องมือ: แยกข้อมูลออกเป็นหลายแผ่นตามมูลค่า; สมุดงานหนึ่งเล่มเป็นไฟล์ Excel, PDF หรือ CSV หลายไฟล์ หนึ่งคอลัมน์ถึงหลายคอลัมน์
  • วางการข้าม แถวที่ซ่อน / กรอง; นับและผลรวม โดย Background Color; ส่งอีเมลส่วนบุคคลไปยังผู้รับหลายคนในกลุ่ม
  • ซุปเปอร์กรอง: สร้างโครงร่างตัวกรองขั้นสูงและใช้กับแผ่นงานใด ๆ ประเภท ตามสัปดาห์วันความถี่และอื่น ๆ กรอง by ตัวหนาสูตรคอมเม้น ...
  • คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ; ทำงานร่วมกับ Office 2007-2021 และ 365; รองรับทุกภาษา ง่ายต่อการปรับใช้ในองค์กรหรือองค์กรของคุณ

ลูกศรสีฟ้าฟองขวา แยกข้อมูลออกเป็นหลายแผ่นตามแถวนับด้วยรหัส VBA

รหัส VBA ต่อไปนี้สามารถช่วยคุณแบ่งแถวออกเป็นหลายแผ่นงานตามจำนวนแถวได้โดยทำดังนี้:

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

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

VBA: แยกข้อมูลออกเป็นแผ่นงานตามจำนวนแถวใน Excel

Sub SplitData()
'Updateby20140617
Dim WorkRng As Range
Dim xRow As Range
Dim SplitRow As Integer
Dim xWs As Worksheet
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
SplitRow = Application.InputBox("Split Row Num", xTitleId, 5, Type:=1)
Set xWs = WorkRng.Parent
Set xRow = WorkRng.Rows(1)
Application.ScreenUpdating = False
For i = 1 To WorkRng.Rows.Count Step SplitRow
    resizeCount = SplitRow
    If (WorkRng.Rows.Count - xRow.Row + 1) < SplitRow Then resizeCount = WorkRng.Rows.Count - xRow.Row + 1
    xRow.Resize(resizeCount).Copy
    Application.Worksheets.Add after:=Application.Worksheets(Application.Worksheets.Count)
    Application.ActiveSheet.Range("A1").PasteSpecial
    Set xRow = xRow.Offset(SplitRow)
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

3. จากนั้นกด F5 เพื่อเรียกใช้รหัสและกล่องโต้ตอบจะปรากฏขึ้นเพื่อเลือกช่วงที่จะแยกจากนั้นคลิก OKและอีกกล่องโต้ตอบเพื่อให้คุณระบุจำนวนแถว ดูภาพหน้าจอ:

4. คลิก OKและช่วงจะถูกแบ่งออกเป็นหลายแผ่นตามจำนวนแถว

หมายเหตุ: แผ่นงานแยกวางไว้ที่ด้านหลังของแผ่นงานหลัก


ลูกศรสีฟ้าฟองขวา แบ่งข้อมูลออกเป็นหลายแผ่นตามแถวนับด้วย Kutools for Excel

โค้ดด้านบนสามารถแบ่งข้อมูลตามจำนวนแถวที่ระบุเท่านั้นและจะไม่เพิ่มชื่อสำหรับข้อมูลเวิร์กชีตแต่ละรายการหากข้อมูลของคุณมีชื่อ

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

Kutools สำหรับ Excel มีเครื่องมือ Excel ที่มีประโยชน์มากกว่า 300 รายการ ทดลองใช้ฟรีโดยไม่มีข้อ จำกัด ใน 30 วัน Get it Now

หากคุณได้ติดตั้ง Kutools for Excel แล้วโปรดดำเนินการดังนี้:

1. เลือกช่วงของข้อมูลที่คุณต้องการแยก

2. คลิก Enterprise > เครื่องมือแผ่นงาน > แยกข้อมูล (หรือ Enterprise > แยกข้อมูล ) ดูภาพหน้าจอ:

doc-split-data-by-row6

3. ใน แยกข้อมูลออกเป็นหลายแผ่นงาน กล่องโต้ตอบ:

  • เลือก แถวคงที่ ราคาเริ่มต้นที่ แยกตาม และป้อนจำนวนแถวที่คุณต้องการแยกสำหรับแต่ละแผ่นงาน (หากข้อมูลของคุณมีส่วนหัวและคุณต้องการแทรกลงในแผ่นงานใหม่แต่ละแผ่นโปรดตรวจสอบ ข้อมูลของฉันมีส่วนหัว ตัวเลือก.)
  • จากนั้นคุณสามารถระบุชื่อแผ่นงานแยกภายใต้ ชื่อแผ่นงานใหม่ เลือกกฎชื่อเวิร์กชีตจากไฟล์ กฎระเบียบ รายการแบบเลื่อนลงคุณสามารถเพิ่มไฟล์ อุปสรรค or วิภัตติ สำหรับชื่อแผ่นงานด้วย ดูภาพหน้าจอ:

doc-split-data-by-row7

4. หลังจากระบุการตั้งค่าแล้วคลิก OKและข้อมูลที่เลือกจะถูกแบ่งออกเป็นหลายแผ่นงานของสมุดงานใหม่ทุกๆ 5 แถว และส่วนหัวจะถูกแทรกสำหรับแผ่นงานใหม่แต่ละแผ่น ดูภาพหน้าจอ:

doc-split-data-by-row8

คลิกเพื่อทราบข้อมูลเพิ่มเติมเกี่ยวกับคุณลักษณะ Split Data นี้

บทความที่เกี่ยวข้อง:

วิธีแบ่งข้อมูลออกเป็นหลายแผ่นตามคอลัมน์ใน Excel


เครื่องมือเพิ่มประสิทธิภาพการทำงานในสำนักงานที่ดีที่สุด

Kutools สำหรับ Excel แก้ปัญหาส่วนใหญ่ของคุณและเพิ่มผลผลิตของคุณได้ถึง 80%

  • นำมาใช้ใหม่: ใส่อย่างรวดเร็ว สูตรที่ซับซ้อนแผนภูมิ และสิ่งที่คุณเคยใช้มาก่อน เข้ารหัสเซลล์ ด้วยรหัสผ่าน; สร้างรายชื่อผู้รับจดหมาย และส่งอีเมล ...
  • ซุปเปอร์ฟอร์มูล่าบาร์ (แก้ไขข้อความและสูตรหลายบรรทัดได้อย่างง่ายดาย); การอ่านเค้าโครง (อ่านและแก้ไขเซลล์จำนวนมากได้อย่างง่ายดาย); วางลงในช่วงที่กรองแล้ว...
  • ผสานเซลล์ / แถว / คอลัมน์ โดยไม่สูญเสียข้อมูล แยกเนื้อหาของเซลล์ รวมแถว / คอลัมน์ที่ซ้ำกัน... ป้องกันเซลล์ซ้ำ; เปรียบเทียบช่วง...
  • เลือกซ้ำหรือไม่ซ้ำ แถว; เลือกแถวว่าง (เซลล์ทั้งหมดว่างเปล่า); Super Find และ Fuzzy Find ในสมุดงานจำนวนมาก สุ่มเลือก ...
  • สำเนาถูกต้อง หลายเซลล์โดยไม่เปลี่ยนการอ้างอิงสูตร สร้างการอ้างอิงอัตโนมัติ ถึงหลายแผ่น ใส่สัญลักษณ์แสดงหัวข้อย่อย, กล่องกาเครื่องหมายและอื่น ๆ ...
  • แยกข้อความ, เพิ่มข้อความ, ลบตามตำแหน่ง, ลบ Space; สร้างและพิมพ์ผลรวมย่อยของเพจ แปลงระหว่างเนื้อหาของเซลล์และความคิดเห็น...
  • ซุปเปอร์ฟิลเตอร์ (บันทึกและใช้โครงร่างตัวกรองกับแผ่นงานอื่น ๆ ); การเรียงลำดับขั้นสูง ตามเดือน / สัปดาห์ / วันความถี่และอื่น ๆ ตัวกรองพิเศษ โดยตัวหนาตัวเอียง ...
  • รวมสมุดงานและแผ่นงาน; ผสานตารางตามคอลัมน์สำคัญ แยกข้อมูลออกเป็นหลายแผ่น; Batch แปลง xls, xlsx และ PDF...
  • คุณสมบัติที่ทรงพลังมากกว่า 300 รายการ. รองรับ Office/Excel 2007-2021 และ 365 รองรับทุกภาษา ง่ายต่อการปรับใช้ในองค์กรหรือองค์กรของคุณ คุณสมบัติเต็มรูปแบบ ทดลองใช้ฟรี 30 วัน รับประกันคืนเงินภายใน 60 วัน
kte แท็บ 201905

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

  • เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
  • เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
  • เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
ด้านล่าง officetab
จัดเรียงความคิดเห็นโดย
ความคิดเห็น (24)
ได้รับคะแนน 5 จาก 5 · การจัดอันดับ 1
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ยอดเยี่ยม . มันยอดเยี่ยมมาก ... ขอบคุณ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี มันไม่ได้ผลสำหรับฉัน ข้อมูลของฉันมาจากตารางเดือยและมีส่วนหัว vba นี้สามารถส่งออกข้อมูลบางส่วนได้ แต่ไม่ใช่ทั้งหมด ... กรุณาช่วย
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันมีส่วนหัวของคอลัมน์หลายแถวที่มีค่าเฉลี่ยและผลรวมที่ด้านบนสุดของแต่ละแผ่นงาน ฉันมีแผนภูมิการกระจายที่ด้านล่าง สิ่งนี้จะต้องเก็บไว้ในแผ่นงานใหม่แต่ละแผ่นที่แยกออก ฉันจะทำให้สิ่งนี้เกิดขึ้นกับเครื่องมือได้อย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ใช้งานได้กับส่วนหัวของคอลัมน์หนึ่งแถว ฉันใช้หลายแถวที่มีค่าเฉลี่ยและผลรวม นอกจากนี้ ฉันมีแผนภูมิการกระจายที่ด้านล่าง ฉันจะรักษาสิ่งเหล่านี้ไว้ได้อย่างไร? ขณะนี้ข้อมูลนี้ไม่ได้ถ่ายโอนไปยังแผ่นงานใหม่ที่สร้างขึ้น
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ใช้งานได้ดีควบคู่ไปกับสิ่งนี้ตามความจำเป็น: http://www.extendoffice.com/documents/excel/628-excel-split-workbook.html
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันได้ค้นหาสิ่งนี้อย่างไม่รู้จบ ขอบคุณมากสำหรับการกวดวิชานี้!!!!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
เราสามารถเพิ่มอันดับเว็บไซต์ของคุณในเครื่องมือค้นหาสำคัญๆ ทั้งหมดได้ในราคาที่เหมาะสม ส่งอีเมลถึงเราเพื่อรับข้อเสนอฉบับเต็ม
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
มีวิธีแยกและจากนั้น exp [ort ไปยังไฟล์ HTML หลายไฟล์หรือไม่?
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณมากสำหรับการกวดวิชานี้ มันทำงานได้ดี
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณสำหรับ VBA-Script ที่ยอดเยี่ยมนี้ แต่จะกำหนดค่าให้ทำซ้ำแถวส่วนหัวในทุกแยกได้อย่างไร
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณมากสำหรับ VBA-Script ที่ยอดเยี่ยม แต่จะแก้ไขอย่างไรเพื่อให้แถวส่วนหัวอยู่ในทุกแยก?
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ใช้งานได้ดี แต่ต้องการผลลัพธ์เป็นสตริง ฉันจะแก้ไขโค้ดได้อย่างไร หรือฉันสามารถพูดตัวอย่าง: 'output',
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สวัสดี ขอบคุณสำหรับรหัสที่ยอดเยี่ยมนี้ แต่ข้อกังวลคือ ที่นี่เราสามารถแยกจำนวนแถวที่แน่นอนเท่านั้น คุณสามารถช่วยฉันแยกตามชื่อหรือรหัส เนื่องจากฉันมีชุดแถวที่แตกต่างกันสำหรับแต่ละเวิร์กชีต
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
โอ้ ขอบคุณมากเพื่อน!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
หลายปีต่อมาและสิ่งนี้ยังคงรักษาไว้ได้ดีเยี่ยม ขอบคุณ!
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ขอบคุณ. ประหยัดเวลาของฉันได้มาก
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ตรวจพบ Minmatar :O
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
ฉันมีข้อมูล 20 ล้านใน excel ฉันต้องแยกมันด้วย 2500 แถวแรกตามด้วย 250 ข้อมูลเป็นต้น ทำยังไงถึงจะทัน.
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
สิ่งนี้มีประโยชน์มาก ขอบคุณ
ความคิดเห็นนี้ถูกย่อให้เล็กสุดโดยผู้ดำเนินรายการบนเว็บไซต์
มีวิธีเก็บส่วนหัวไว้ในเวิร์กชีตทั้งหมดหรือไม่?
ตัวอย่างเช่น แถวที่ 1 คือชื่อคอลัมน์ และแถวที่ 2 ถึงแถว 51 คือข้อมูลของฉัน เมื่อฉันแบ่งออกเป็น 10 แผ่นงาน ฉันหวังว่าจะมีแถวที่ 1 เป็นส่วนหัว และแถวที่ 2-6 เป็นข้อมูล
มีความคิดเห็นยังไม่มีการโพสต์ที่นี่
โหลดเพิ่มเติม
แสดงความคิดเห็นของคุณ
โพสต์ในฐานะแขก
×
ให้คะแนนโพสต์นี้:
0   ตัวอักษร
สถานที่แนะนำ

ช่องทางอื่นๆ

ลิขสิทธิ์© 2009 - wwwextendoffice.com | สงวนลิขสิทธิ์. ขับเคลื่อนโดย ExtendOffice. | แผนผังเว็บไซต์
Microsoft และโลโก้ Office เป็นเครื่องหมายการค้าหรือเครื่องหมายการค้าจดทะเบียนของ Microsoft Corporation ในสหรัฐอเมริกาและ / หรือประเทศอื่น ๆ
ได้รับการปกป้องโดย Sectigo SSL