วิธีการซ้อนคอลัมน์หลายคอลัมน์เป็นคอลัมน์เดียวใน Excel ได้อย่างรวดเร็ว?
ใน Excel ฟังก์ชัน Text to Column สามารถแบ่งเซลล์ออกเป็นหลายคอลัมน์ตามตัวคั่น แต่ถ้ามีวิธีใดในการซ้อนคอลัมน์หลายคอลัมน์เป็นคอลัมน์เดียวตามภาพด้านล่างที่แสดง? ในบทความนี้ฉันจะแนะนำเทคนิคบางอย่างในการแก้ปัญหานี้อย่างรวดเร็ว
ซ้อนคอลัมน์หลายคอลัมน์เป็นคอลัมน์เดียวด้วยสูตร
ซ้อนคอลัมน์หลายคอลัมน์เข้าด้วยกันด้วย VBA
ซ้อนคอลัมน์หลายคอลัมน์เป็นหนึ่งเดียวด้วย Transform Range
ซ้อนคอลัมน์หลายคอลัมน์เป็นคอลัมน์เดียวด้วยสูตร
1. เลือกช่วงที่คุณต้องการวางซ้อนและไปที่ไฟล์ ชื่อ: กล่อง เพื่อตั้งชื่อช่วงนี้และกด เข้าสู่ สำคัญ. ดูภาพหน้าจอ:
2. จากนั้นเลือกเซลล์ว่างที่คุณต้องการวางผลลัพธ์ป้อนสูตรนี้ =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1)กด Enter และลากเติมที่จับลงจนกระทั่งข้อผิดพลาดปรากฏขึ้น ดูภาพหน้าจอ:
ซ้อนคอลัมน์หลายคอลัมน์เข้าด้วยกันด้วย VBA
นี่คือรหัส VBA ที่สามารถช่วยคุณได้เช่นกัน
1 กด Alt + F11 ปุ่มเพื่อแสดง Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 คลิก สิ่งที่ใส่เข้าไป > โมดูลวางโค้ดด้านล่างลงในไฟล์ โมดูล.
VBA: จัดเรียงคอลัมน์เป็นหนึ่ง
Sub ConvertRangeToColumn()
'UpdatebyExtendoffice
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
Rng.Copy
Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub
3 กด F5 กุญแจสำคัญในการรันโค้ดกล่องโต้ตอบจะปรากฏขึ้นเพื่อเลือกแหล่งข้อมูลและคลิก OKเพื่อเลือกเซลล์ที่จะวางผลลัพธ์ ดูภาพหน้าจอ:
4 คลิก OK. ตอนนี้คอลัมน์ถูกซ้อนกันในคอลัมน์เดียว
ซ้อนคอลัมน์หลายคอลัมน์เป็นหนึ่งเดียวด้วย Transform Range
เพื่อนำไปใช้ Kutools สำหรับ Excel's ช่วงการแปลง ยูทิลิตี้ยังสามารถช่วยคุณแก้ปัญหานี้ได้อย่างรวดเร็ว
Kutools สำหรับ Excel, ที่มีมากกว่า 300 ฟังก์ชั่นที่มีประโยชน์ทำให้งานของคุณง่ายขึ้น | ||
หลังจาก ติดตั้งฟรี Kutools สำหรับ Excel โปรดทำดังนี้:
1. เลือกข้อมูลคอลัมน์ที่คุณใช้แล้วคลิก Kutools > พิสัย > ช่วงการแปลง. ดูภาพหน้าจอ:
2 ใน ช่วงการแปลง โต้ตอบตรวจสอบ ช่วงเป็นคอลัมน์เดียว แล้วคลิก Okจากนั้นเลือกเซลล์เพื่อวางผลลัพธ์ ดูภาพหน้าจอ:
3 คลิก OK. ตอนนี้คอลัมน์ถูกซ้อนกันเป็นคอลัมน์เดียว
กองเซลล์หลายเซลล์เป็นคอลัมน์เดียว
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!