วิธีแปลงตารางอาร์เรย์เป็นตารางรายการใน Excel อย่างรวดเร็ว

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

แปลงตารางอาร์เรย์เป็นตารางรายการด้วย PivotTable

แปลงตารางอาร์เรย์เป็นตารางรายการด้วย VBA

แปลงตารางอาร์เรย์เป็นตารางรายการด้วย Kutools for Excel

แปลงตารางอาร์เรย์เป็นตารางรายการด้วย PivotTable

คุณสามารถใช้ PivotTable เพื่อแปลงตารางอาร์เรย์เป็นรายการแล้วคัดลอกเป็นช่วง

1 กด Alt + D พร้อมกันแล้วกด P กุญแจสำคัญในการเปิดใช้งานไฟล์ PivotTable และ PivotChart Wizard โต้ตอบและตรวจสอบ ช่วงการรวมหลายรายการ และ PivotTable ตัวเลือก. ดูภาพหน้าจอ:

2. คลิกถัดไปเพื่อไปที่ขั้นตอนที่ 2a ของวิซาร์ดและเลือกฉันจะสร้างตัวเลือกฟิลด์เพจ ดูภาพหน้าจอ:

3 คลิก ถัดไป เพื่อไปที่ ขั้นตอนที่ 2b ของตัวช่วยสร้างและเลือกช่วงอาร์เรย์และเพิ่มลงใน ทุกช่วง รายการ. ดูภาพหน้าจอ:

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

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

6. จากนั้นเลือกรายการ PivotTable และคลิกขวาเพื่อเลือก ตาราง > แปลงเป็น Range จากเมนูบริบท ดูภาพหน้าจอ:

ตอนนี้ตารางอาร์เรย์ถูกแปลงเป็นตารางรายการแล้ว

แปลงตารางอาร์เรย์เป็นตารางรายการด้วย VBA

นี่คือ VBA สามารถช่วยคุณแปลงตารางอาร์เรย์เป็นตารางรายการโปรดทำตามขั้นตอนด้านล่าง:

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

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

VBA: แปลงตารางอาร์เรย์เป็นรายการ

Sub ConvertTableToList()
'UpdatebyEntendOffice20160429
    Dim I As Long
    Dim xCls As Long
    Dim xRg As Range
    Dim xSaveToRg As Range
    Dim xTxt As String
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Select Array Table:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    Set xSaveToRg = Application.InputBox("Select a range(cell) to put the list table", "Kutools for Excel", , , , , , 8)
    If xSaveToRg Is Nothing Then Exit Sub
    Set xSaveToRg = xSaveToRg.Cells(1)
    xCls = xRg.Columns.Count - 1
    Application.ScreenUpdating = False
    For I = 1 To xRg.Rows.Count
        xSaveToRg.Offset((I - 1) * xCls).Value = xRg.Cells(I, 1).Value
        xSaveToRg.Offset((I - 1) * xCls, 1).Resize(xCls).Value = _
                        Application.WorksheetFunction.Transpose(xRg.Cells(I, 2).Resize(1, xCls))
    Next
    Application.ScreenUpdating = True
End Sub

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

4 คลิก OK เพื่อไปที่กล่องโต้ตอบถัดไปเพื่อเลือกเซลล์ที่จะส่งออกตารางรายการ ดูภาพหน้าจอ:

5 คลิก OKและตารางอาร์เรย์ถูกแปลงเป็นรายการ

เคล็ดลับ:

หากคุณต้องการเติมเซลล์ว่างตามเซลล์ด้านบนคุณสามารถทำได้ดังนี้:

1. การติดตั้ง Kutools สำหรับ Excel - เครื่องมือที่มีประโยชน์แล้วคลิก Kutools > สิ่งที่ใส่เข้าไป > เติมเซลล์ว่าง. ดูภาพหน้าจอ:

2 ใน เติมเซลล์ว่าง โต้ตอบตรวจสอบ ขึ้นอยู่กับค่า และ ลง ตัวเลือก. ดูภาพหน้าจอ:

3 คลิก Ok or สมัครสมาชิกและตอนนี้เซลล์ว่างจะถูกเติมเต็มตามค่าด้านบน

คลิกที่นี่เพื่อทราบข้อมูลเพิ่มเติมเกี่ยวกับ Fill Blank Cells

แปลงตารางอาร์เรย์เป็นตารางรายการด้วย Kutools for Excel

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

หลังจาก ติดตั้งฟรี Kutools สำหรับ Excel โปรดทำดังนี้:

1. เลือกตารางอาร์เรย์ที่คุณต้องการแปลงเป็นรายการแล้วคลิก Kutools > พิสัย > เปลี่ยนขนาดตาราง. ดูภาพหน้าจอ:

2. จากนั้นใน เปลี่ยนขนาดตาราง กล่องโต้ตอบเลือกตัวเลือกข้ามตารางไปยังรายการจากนั้นเลือกช่วงที่ส่งออกตารางรายการ ดูภาพหน้าจอ:

3 คลิก Okตอนนี้ตารางอาร์เรย์ถูกแปลงเป็นตารางรายการแล้ว

คลิกที่นี่เพื่อเรียนรู้เพิ่มเติมเกี่ยวกับขนาดตารางการเปลี่ยน