如何按指定表头格式整理乱序的Spreadsheet数据？

算力阿峰

2026-7-2

按标准表头整理乱序电子表格数据的实用方法

公式匹配法（Excel/Google Sheets通用）

Excel（XLOOKUP函数）

假设乱序数据在Sheet1，标准表头在Sheet2第一行

在Sheet2的A2单元格输入公式：

=XLOOKUP($A$1,Sheet1!$1:$1,Sheet1!$2:$1000,"",0)

横向拖动填充所有标准表头列，再纵向拖动覆盖所有数据行（$2:$1000可根据实际数据行数调整）
原理：通过标准表头匹配乱序表的对应列，直接提取整列数据

旧版Excel（INDEX+MATCH组合）

如果没有XLOOKUP函数，用以下公式替代：

=INDEX(Sheet1!$A:$Z,MATCH(ROW(A2),Sheet1!$A:$A,0),MATCH(Sheet2!A$1,Sheet1!$1:$1,0))

同样拖动填充即可。

Google Sheets

在Sheet2的A2单元格输入：

=ARRAYFORMULA(VLOOKUP(ROW(Sheet1!A2:A),Sheet1!A:Z,MATCH(Sheet2!A1:Z1,Sheet1!1:1,0),FALSE))

自动匹配并填充所有数据。

Power Query批量整理（Excel专属）

选中Sheet1的数据区域，点击数据选项卡 → 从表格/区域，导入Power Query编辑器
确认第一行为表头后，点击转换选项卡 → 选择列
在弹窗中点击加载列，粘贴Sheet2的标准表头列表，调整列顺序与标准格式完全一致
点击关闭并上载，生成的新工作表就是标准格式的数据

VBA脚本（适合频繁批量处理）

如果需要重复处理这类数据，可以用VBA一键完成：

Sub MatchHeaders()
    Dim wsSource As Worksheet, wsTarget As Worksheet
    Dim header As Range, targetHeader As Range
    Set wsSource = ThisWorkbook.Sheets("Sheet1") '乱序表
    Set wsTarget = ThisWorkbook.Sheets("Sheet2") '标准表
    
    For Each targetHeader In wsTarget.Range("A1", wsTarget.Cells(1, wsTarget.Columns.Count).End(xlToLeft))
        Set header = wsSource.Rows(1).Find(targetHeader.Value, LookIn:=xlValues, LookAt:=xlWhole)
        If Not header Is Nothing Then
            header.EntireColumn.Copy wsTarget.Cells(1, targetHeader.Column)
        End If
    Next targetHeader
End Sub