技术问询：如何将Excel部分列单元格转成行并保留其余行结构？

刚巧我之前处理过一模一样的需求，给你整理了三个靠谱的方法，按需选就行：

方法1：Power Query（推荐，可视化操作，零代码） #

这是最省心的方法，适合大多数用户，操作步骤清晰：

• 选中你的数据区域，点击菜单栏的数据选项卡，选择「从表格/区域」（记得勾选「我的表格有标题」）
• 进入Power Query编辑器后，按住Ctrl选中所有需要转成行的列
• 点击转换选项卡，找到「逆透视列」（如果是要保留某几列、转换其余列，就选「逆透视其他列」）
• 此时你会看到：原来的列标题变成了新的一列（默认叫「属性」），对应单元格内容变成「值」列，其他保留列的内容会自动重复匹配
• 可以右键修改新列的名称（比如把「属性」改成你需要的类别名），然后点击左上角的「关闭并上载」，Excel会自动生成一个新的结构化表格，就是你要的格式！

方法2：公式组合法（适合喜欢用函数的用户） #

假设你的数据结构是：A列是需要保留的列，B、C、D列是要转成行的列，目标结果从E列开始：

1. E列（保留列内容）：输入公式 =INDEX($A:$A,INT((ROW()-ROW($E$1))/3)+1)，其中3是你要转换的列数（B、C、D共3列），下拉公式，A列的内容会每3行重复一次
2. F列（原列标题）：输入公式 =INDEX($B$1:$D$1,MOD(ROW()-ROW($F$1),3)+1)，下拉后会循环显示B1、C1、D1的标题
3. G列（对应单元格值）：输入公式 =INDEX($B:$D,INT((ROW()-ROW($G$1))/3)+1,MOD(ROW()-ROW($G$1),3)+1)，下拉后会依次取出B2、C2、D2，B3、C3、D3...
4. 下拉公式直到没有数据后，选中E:G列，复制后右键选择「粘贴为值」，就可以固定结果了

方法3：VBA宏（适合批量/重复处理大量数据） #

如果需要经常处理这类转换，或者数据量极大，用宏效率更高：

• 按下Alt+F11打开VBA编辑器，右键你的工作簿 → 插入 → 模块
• 粘贴以下代码，根据你的实际数据修改sourceRange（源数据区域）和targetRange（结果起始单元格）：

Sub ColumnsToRows()
    Dim sourceRange As Range
    Dim targetRange As Range
    Dim sourceRow As Long
    Dim targetRow As Long
    Dim col As Integer
    Dim numColsToConvert As Integer
    
    ' 替换成你的源数据区域（比如A1:D10，A列保留，B-D列转换）
    Set sourceRange = ThisWorkbook.Sheets("Sheet1").Range("A1:D10")
    ' 替换成结果存放的起始单元格（比如F1）
    Set targetRange = ThisWorkbook.Sheets("Sheet1").Range("F1")
    
    ' 计算要转换的列数（这里假设第一列是保留列，后面的都是要转的）
    numColsToConvert = sourceRange.Columns.Count - 1
    targetRow = 1
    
    For sourceRow = 1 To sourceRange.Rows.Count
        ' 写入保留列的内容
        targetRange.Cells(targetRow, 1).Value = sourceRange.Cells(sourceRow, 1).Value
        ' 循环处理每一列要转换的数据
        For col = 2 To sourceRange.Columns.Count
            targetRange.Cells(targetRow, 2).Value = sourceRange.Cells(1, col).Value ' 写入原列标题
            targetRange.Cells(targetRow, 3).Value = sourceRange.Cells(sourceRow, col).Value ' 写入单元格值
            targetRow = targetRow + 1
        Next col
    Next sourceRow
    
    MsgBox "转换完成！"
End Sub

• 按下F5运行宏，或者回到Excel给宏添加一个快速访问按钮，下次直接点击就能用

内容的提问来源于stack exchange，提问作者Moon