Excel横列转换竖列,网上查了很多方法都没有找到可以解决的,望高手指教,详解,非常感谢!!
如图:
我只有5财富值,能解决的,奖赏我全部财富值,谢谢了。
批量解决,数据有几万个
Excel怎么将表格竖列变横列?这个视频告诉你!
有几万行,要批量解决
追答那要写VBA啦~你可以具体一些,转换前的范围和转换后的范围吗?还有货号是有很多是吗?
追问是的,货号有很多很多,有没有函数什么的可以解决到
追答运行一下下面的VBA把,不过要把worksheet名改下
Sub Change()
Dim i, j
j = 2
For Each cel In Worksheets("Sheet1").Range("A:A") '转换前sheet名为sheet1, 可以改下
If Trim(cel.Value) = "" Then
Exit For
End If
If cel.Row > 1 Then
For i = 2 To 11 '转换前sheet1价格到K列,即11,可以改下
Worksheets("sheet2").Cells(j, 1).Value = cel.Value '转换后sheet名为sheet2, 可以改下
Worksheets("sheet2").Cells(j, 2).Value = Worksheets("sheet1").Cells(1, i).Value
Worksheets("sheet2").Cells(j, 3).Value = Worksheets("sheet1").Cells(cel.Row, i).Value
j = j + 1
Next
End If
Next
End Sub
高手啊,虽然还是不懂,但真心感谢你的回答,谢谢!!
本回答被网友采纳