วิธีการเปลี่ยนช่วงและสแต็กข้อมูลใน Excel อย่างง่ายดายและรวดเร็ว
ตัวอย่างเช่นมีข้อมูลบางส่วนแสดงเป็นกลุ่มและตอนนี้ฉันต้องการเปลี่ยนช่วงและจัดเรียงข้อมูลในแต่ละคอลัมน์ตามภาพด้านล่างที่แสดง ในบทความนี้ฉันจะแนะนำวิธีการในงานนี้ใน Excel
เปลี่ยนและจัดเรียงข้อมูลด้วย VBA
ย้ายและจัดเรียงข้อมูลด้วย Transpose Table Dimension
เปลี่ยนและจัดเรียงข้อมูลด้วย VBA
คุณสามารถใช้รหัส VBA เพื่อเปลี่ยนและจัดเรียงข้อมูล
1. เลือกข้อมูลยกเว้นส่วนหัวของคอลัมน์แล้วกด Alt + F11 คีย์เพื่อเปิดใช้งาน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 คลิก สิ่งที่ใส่เข้าไป > โมดูลและวางโค้ดด้านล่างลงในไฟล์ โมดูล.
VBA: เปลี่ยนและจัดเรียงข้อมูล
Sub ConvertTableToList()
'UpdatebyExtendoffice20161121
Const TEST_COLUMN As String = "A"
Dim i As Long, j As Long
Dim iLastRow As Long
Dim iLastCol As Long
Application.ScreenUpdating = False
With ActiveSheet
iLastRow = .Cells(.Rows.Count, TEST_COLUMN).End(xlUp).Row
For i = iLastRow To 2 Step -1
iLastCol = .Cells(i, .Columns.Count).End(xlToLeft).Column
For j = iLastCol To 3 Step -1
.Rows(i + 1).Insert
.Cells(i + 1, 2).Value = .Cells(i, j).Value
.Cells(i, j).Value = ""
Next j
Next i
.Rows(1).Delete
End With
Application.ScreenUpdating = True
End Sub
3 กด F5 จากนั้นข้อมูลจะถูกย้ายและซ้อนกัน ดูภาพหน้าจอ:
หมายเหตุ ในรหัส VBA A ระบุให้วางข้อมูลการเปลี่ยนในคอลัมน์ A ของแผ่นงานที่ใช้งานอยู่และแทนที่ข้อมูลเดิมในคอลัมน์ A
ย้ายและจัดเรียงข้อมูลด้วย Transpose Table Dimension
หากคุณต้องการเปลี่ยนช่วงและสแต็กข้อมูลอย่างรวดเร็วและง่ายดายโดยไม่ต้องใช้รหัส VBA คุณสามารถสมัครได้ Kutools สำหรับ Excel's เปลี่ยนขนาดตาราง ประโยชน์
Kutools สำหรับ Excel, ที่มีมากกว่า 300 ฟังก์ชั่นที่มีประโยชน์ทำให้งานของคุณง่ายขึ้น |
หลังจากการติดตั้ง Kutools สำหรับ Excel โปรดทำดังนี้ :(ดาวน์โหลด Kutools for Excel ได้ฟรีทันที!)
1. เลือกข้อมูลที่คุณใช้คลิก Kutools > พิสัย > เปลี่ยนขนาดตาราง. ดูภาพหน้าจอ:
2. ในกล่องโต้ตอบให้เลือก ข้ามตารางไปยังรายการ และเลือกเซลล์ที่คุณต้องการวางข้อมูลที่ถูกย้าย ช่วงผลลัพธ์ (เซลล์เดียว) กล่องข้อความ. ดูภาพหน้าจอ:
3 คลิก Ok. ตอนนี้มีการย้ายช่วงและวางซ้อนกันในคอลัมน์แล้ว
ช่วงการเปลี่ยนและข้อมูลกองซ้อน
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!