如何在 Excel 中快速將陣列表格轉換為清單表格？

假設您有一個陣列表格/交叉表格，將這個陣列表格轉換為清單表格對您來說可能不是一件困難的事，您可以逐一手動輸入數據來完成轉換。然而，如果有許多陣列表格需要轉換為清單表格，手動方法肯定不是一個好的解決方案。現在，本教程介紹了一些技巧，可以快速將陣列表格轉換為清單表格。

使用樞紐分析表將陣列表格轉換為清單表格

使用 VBA 將陣列表格轉換為清單表格

使用 Kutools for Excel 將陣列表格轉換為清單表格

使用樞紐分析表將陣列表格轉換為清單表格

您可以應用樞紐分析表將陣列表格轉換為清單，然後將其複製為區域。

1. 同時按下 Alt + D，然後按 P 鍵啟用「樞紐分析表和樞紐分析圖精靈」對話框，並檢查「多重合併計算區域」和「樞紐分析表」選項。請參見截圖：

2. 點擊「下一步」進入精靈的第 2a 步，並檢查「我將創建頁面欄位」選項。請參見截圖：

3. 點擊「下一步」進入精靈的第 2b 步，選擇陣列範圍並將其添加到「所有範圍」列表中。請參見截圖：

4. 點擊「下一步」進入最後一步，根據需要檢查一個選項。請參見截圖：

5. 點擊「完成」，然後會創建一個樞紐分析表，接著前往「總計」的交叉單元格，雙擊它，您會看到已在新工作表中創建了一個清單樞紐分析表。請參見截圖：

6. 然後選擇清單樞紐分析表，右鍵單擊並從上下文菜單中選擇 「表格 > 轉換為區域」。請參見截圖：

現在，陣列表格已轉換為清單表格。

使用 VBA 將陣列表格轉換為清單表格

這裡有一個 VBA 可以幫助您將陣列表格轉換為清單表格，請按照以下步驟操作：

1. 按下 Alt + F11 啟用 Microsoft Visual Basic for Applications 窗口。

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. 點擊「確定」進入下一個對話框，選擇一個單元格以輸出清單表格。請參見截圖：

5. 點擊「確定」，陣列表格已轉換為清單。

提示：

如果您想根據上方單元格填補空白單元格，可以按照以下步驟操作：

1. 安裝 Kutools for Excel -- 一款實用工具，然後點擊 Kutools > 插入 > 填補空白單元格。請參見截圖：

2. 在「填補空白單元格」對話框中，檢查「基於值」和「向下」選項。請參見截圖：

3. 點擊「確定」或「應用」，現在空白單元格已根據上方值填補。

點擊此處了解更多關於填補空白單元格的信息。

使用 Kutools for Excel 將陣列表格轉換為清單表格

如果上述方法對您來說不夠簡單，這裡我可以介紹一款實用工具 – Kutools for Excel，它的「轉換表格維數」功能可以快速輕鬆地在陣列表格和清單表格之間進行轉換。

免費安裝 Kutools for Excel 後，請按照以下步驟操作：

1. 選擇要轉換為清單的陣列表格，並點擊 Kutools > 區域 > 轉換表格維數。請參見截圖：

2. 然後在「轉換表格維數」對話框中，檢查「二維表轉一維表」選項，然後選擇輸出清單表格的範圍。請參見截圖：

3. 點擊「確定」，現在陣列表格已轉換為清單表格。

點擊此處了解更多關於「轉換表格維數」的信息。