
Excel 中E1=A1,E2=B1,E3=C1,E4=D1......怎么算
E5=A2,E6=B2,E7=C2,E8=D2有很多行,成批量的,要变成一列!各位大虾,我是菜鸟,帮帮忙,比较急!...
E5=A2,E6=B2,E7=C2,E8=D2有很多行,成批量的,要变成一列!各位大虾,我是菜鸟,帮帮忙,比较急!
展开
2个回答
展开全部
E1输入:
=OFFSET($A$1,INT((ROW()-1)/4),MOD(ROW()-1,4))
下拉即可
祝你成功!
=OFFSET($A$1,INT((ROW()-1)/4),MOD(ROW()-1,4))
下拉即可
祝你成功!
展开全部
楼上是用公式解决,我来个vba代码的
Sub aaaa()
Dim d, i%
Set d = CreateObject("Scripting.Dictionary")
For Each cl In Sheets(1).UsedRange.Columns("A:D").Cells
d(cl) = ""
Next
For Each dl In d.keys
i = i + 1
Cells(i, 5) = dl
Next
End Sub
Alt+F11进入vba编辑器,插入模块,把代码复制到模块,运行即可。
Sub aaaa()
Dim d, i%
Set d = CreateObject("Scripting.Dictionary")
For Each cl In Sheets(1).UsedRange.Columns("A:D").Cells
d(cl) = ""
Next
For Each dl In d.keys
i = i + 1
Cells(i, 5) = dl
Next
End Sub
Alt+F11进入vba编辑器,插入模块,把代码复制到模块,运行即可。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询