发布网友 发布时间:2022-04-23 08:50
共3个回答
热心网友 时间:2022-06-11 08:25
Sub ceshi()
n = Cells(65556, 1).End(xlUp).Row
For i = 2 To [zz1].End(xlToLeft).Column
For j = 1 To Cells(65556, i).End(xlUp).Row
n = n + 1
Cells(n, 1) = Cells(j, i)
Next
Next
End Sub
热心网友 时间:2022-06-11 08:26
A1单元格输入公式=OFFSET(B$1,MOD(ROW(A2),2),INT(ROW(A2)/2)-1)&""
下拉公式。 如图:
追问我又80w的数据,怎么才能都拽下来。追答数据量太大,就用楼上VB代码解决。
热心网友 时间:2022-06-11 08:26
可以选中需要位移的单元格,用填充柄进行填充,可以选择复制或者序列