如何在excel中使用宏实现如下功能
比如1行有如下数据354427492449354285683268行有如下数据3563292224663724894817132行有如下数据343526162409364...
比如 1行有如下数据 3544 2749 2449 3542 856 832
68行有如下数据3563 2922 2466 3724 894 817
132行有如下数据3435 2616 2409 3643 828 891
256行有如下数据3570 2921 2490 3617 771 842
…………依此类推:现想通过宏把他们聚在一起:
结果如:从1行m列开始:3544 2749 2449 3542 856 832
接2行m列开始:3563 2922 2466 3724 894 817
接3行m列开始:3435 2616 2409 3643 828 891
接4行m列开始:3570 2921 2490 3617 771 842
………………如何实现(在一张表中)用宏的相对引用:它们不会接着啊。
逐个修改宏也麻烦啊。 上面的1行,68行等从A列开始 展开
68行有如下数据3563 2922 2466 3724 894 817
132行有如下数据3435 2616 2409 3643 828 891
256行有如下数据3570 2921 2490 3617 771 842
…………依此类推:现想通过宏把他们聚在一起:
结果如:从1行m列开始:3544 2749 2449 3542 856 832
接2行m列开始:3563 2922 2466 3724 894 817
接3行m列开始:3435 2616 2409 3643 828 891
接4行m列开始:3570 2921 2490 3617 771 842
………………如何实现(在一张表中)用宏的相对引用:它们不会接着啊。
逐个修改宏也麻烦啊。 上面的1行,68行等从A列开始 展开
3个回答
展开全部
问题:总共多少行? 怎么1行、68行、132行、256行,这些行没有规律啊,其余还有那些行啊?
下面的VBA能把你指出来的部分收集到一起:
Sub collect()
For i = 1 To 5
Cells(1, 12 + i) = Cells(1, i)
Cells(2, 12 + i) = Cells(68, i)
Cells(3, 12 + i) = Cells(132, i)
Cells(4, 12 + i) = Cells(256, i)
Next i
End Sub
下面的VBA能把你指出来的部分收集到一起:
Sub collect()
For i = 1 To 5
Cells(1, 12 + i) = Cells(1, i)
Cells(2, 12 + i) = Cells(68, i)
Cells(3, 12 + i) = Cells(132, i)
Cells(4, 12 + i) = Cells(256, i)
Next i
End Sub
展开全部
1-68-132-256....有什么规律?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
如果m>7,则用不着宏。
复制A:F 到m列,在m-1列输入=if(H1="",0,1)
拖拉到最后,排序就好了。删去该列!
复制A:F 到m列,在m-1列输入=if(H1="",0,1)
拖拉到最后,排序就好了。删去该列!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询