excel中如何批量实现一行数据复制成多行？

Question

excel中如何批量实现一行数据复制成多行？

[图片] 如何快速将每一行复制三行并插入，如下图效果，由于数据有两万多条，一些技巧无法实现目的。求大神帮忙，谢谢谢谢！ [图片]

关注者

19

被浏览

153,327

4 个回答

TuskAi 2022-10-01起失业，擅长VBA+SQL+OFFICE · Accepted Answer

VBA也可以做到

https://www.zhihu.com/video/969262900171423744

右键工作表标签，选择查看代码，粘贴下边的代码并运行

Sub 批量插入行()
Application.ScreenUpdating = False '关闭屏幕刷新
For i = 5 To 2 Step -1 '从第五行到第二行循环
    For n = 1 To 3 '循环3次
        Rows(i & ":" & i).Select '选中第I行
        Selection.Copy '复制
        Selection.Insert Shift:=xlDown '粘贴，活动单元格下移