复制选中数据,在另一个表中右键>选择性粘贴>在“跳过空单元格”和“转置”前面加上钩>确定。
如果结果是全在一行,就选中这行,按上面的步骤再来一次,就变成一列了。
希望能帮到你。
=OFFSET(A$1,MOD(ROW(1:1)-1,10),INT((ROW(1:1)-1)/10)+1)
上面公式的10,是数据行数,根据你的实际行数修改
把这个公式输入到第一列最后一个数据下面,然后下拉复制
祝你成功
可以用VBA完成。
下面的代码将当前工作表的选区中的单元格内容依次写入sheet2的A列
Sub test()
With Sheets("sheet2")
For Each c In Selection.Cells
r = r + 1
.Cells(r, 1) = c
Next
End With
End Sub
复制——右键——选择性粘贴,选“跳过空单元格”和“转置”