excel如何批量将行数据转换成列数据？_旅游问答

创始人

2025-04-01 08:04:30

excel如何批量将行数据转换成列数据？数据非常的多，我想让行的码数，转换成列，要一行一行的复制粘贴右键转换吗？

复制，粘贴的时候选择性粘贴，倒置，就可以了
在表二C2输入=sumifs(sheet1!$C:$C，sheet1!$A:$A，$B2，sheet1!$B:$B，C$1)，公式向右向下拉自动填充即可。
先复制，然后粘贴，粘贴选项里有转置，你试试

Sub abc()

Dim A As Range, I As Range, J As Range

Set A = Range("A2")

For Each I In Range(Range("E2"), Range("E65535").End(3))

For Each J In Range(Range("F1"), Range("F1").End(2))

A = I.Value

A.Offset(0, 1) = J

A.Offset(0, 2) = I.Offset(0, J.Column - 5)

Set A = A.Offset(1, 0)

Next J

Next I

End Sub