excel表格怎么快速插入空行? VBA批量隔行加入空白行的技巧

微软Office LTSC 2021专业增强版 简体中文批量许可版 2023年07月更新

• 类型：办公软件
• 大小：2.2GB
• 语言：简体中文
• 时间：2023-07-12

查看详情

批量插入空白行的方式不唯一，可以通过排序的方式，定位法插入，也可以通过函数的方式，还能通过VBA自动化实现，本例先主要讲述VBA自动化实现。

首先第一个使用VBA的话，需要注意:

第一个把xlsx格式另存为xlsm格式（文件--另存为--（选中保存位置）--保存类型（Excel启动宏的工作簿））

第二个：调出开发工具

文件--更多-选项--自定义功能区--开发工具

第三个：开发工具--Visual Basic

弹出功能框

插入--模块

将下列代码复制到窗口中

Sub insertBlank() Dim n As Integer n = Range("a1", Cells(Rows.Count, 1).End(xlUp)).Rows.Count For i = 2 To 2 * n Step 2 Rows(i).Select Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove Next End Sub

点击保存，关闭窗口

开发工具--宏

选择执行

结果

以上就是VBA批量隔行加入空白行的技巧，希望大家喜欢，请继续关注0133技术站。

相关推荐：

excel表格怎么利用VBA代码快速制作一份通讯录?

excel表格怎么利用VBA代码插入交叉矩形图?