Excel中如何将竖排多列长数据变成多行横排?

发布网友发布时间：2022-04-26 08:46

共3个回答

热心网友时间：2022-06-26 01:27

加辅助列轻松解决，把问题作为内容（游舰主题一定要包含“excel”,本人以此为依据辨别非垃圾游舰，以免误删）,excel样表文件（尽量详细说明现状和目标效果）作为附件发到一流3油香：yqch134帮你看下

热心网友时间：2022-06-26 01:28

复制，然后粘贴时选择“转置”

热心网友时间：2022-06-26 01:28

拿去，运行这个宏代码
Sub aa()
Dim i, k, x
For i = 2 To Range("a65536").End(xlUp).Row
x = WorksheetFunction.CountIf(Range(Cells(1, 1), Cells(i, 1)), Cells(i, 1))
If x = 1 Then
y = WorksheetFunction.CountIf(Range("a:a"), Cells(i, 1))
Z = WorksheetFunction.CountA(Range("l2:cz2"))
Range(Cells(i, 1), Cells(y + i - 1, "j")).Select
Range(Cells(i, 1), Cells(y + i - 1, "j")).Copy Cells(2, Z + 12)
End If
Next
End Sub