【高分!!!】excel如何把N多列的数据全部移动到第一列,不是合并几个列的数据 50

如题,比如我有N列的数据,我想不变的全部在第一列A里面从上到下展示,粘贴复制太麻烦,有没有快速一点的办法!!在线等答案!数据量比较大,不适合粘贴复制,所以求简单的方案... 如题,比如我有N列的数据,我想不变的全部在第一列A里面从上到下展示,粘贴复制太麻烦,有没有快速一点的办法!!在线等答案!
数据量比较大,不适合粘贴复制,所以求简单的方案
展开
 我来答
鱼木混猪哟
高粉答主

2015-11-13 · 专注Office,尤其Excel和VBA
鱼木混猪哟
采纳数:6078 获赞数:33697

向TA提问 私信TA
展开全部
VBA,代码如下:
Sub main()
arr = Range("A1").CurrentRegion
ReDim brr(UBound(arr, 2) * UBound(arr))
For i = 1 To UBound(arr, 2)
For j = 1 To UBound(arr)
If arr(j, i) <> "" Then
k = k + 1
brr(k - 1) = arr(j, i)
End If
Next j
Next i
[h1].Resize(UBound(brr), 1) = Application.Transpose(brr) '数据粘贴到H列,根据实际情况修改
End Sub
沈一民
2017-06-21 · TA获得超过8012个赞
知道大有可为答主
回答量:8448
采纳率:85%
帮助的人:2650万
展开全部

H1=INDEX($A$1:$F$4,MOD(ROW(A4),4)+1,INT(ROW(A4)/4))向下复制

本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
s今生缘
高粉答主

2015-11-13 · 醉心答题,欢迎关注
知道大有可为答主
回答量:3.2万
采纳率:85%
帮助的人:4898万
展开全部
都是4行,在H1输入公式:
=OFFSET($A$1,MOD(ROW(A1)-1,4),(ROW(A1)-1)/4),下拉填充。

行数不等,用VBA。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
可爱就是笑
2015-11-13 · TA获得超过1599个赞
知道大有可为答主
回答量:4011
采纳率:70%
帮助的人:628万
展开全部
QZ---------
复制粘贴,也可以简单起来
开始接触录制宏吧,一切皆有可能
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(2)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式