excel如何实现多行多列变一列

Question

如图

Answer 1

宏代码

Sub kl()

Dim i

For i = 1 To Selection.Count

 Cells(i, 6) = Selection(i)

Next

End Sub

Answer 2

=OFFSET($A$1,MOD(ROW(A1)-1,3),INT((ROW(A1)-1)/3))
下拉公式即可

Answer 3

选择需要合并的单元格
点击合并按钮（在正上方找下）