我们还可以利用 VBA(Visual Basic for Applications)宏语言,在 Excel 中写一个 VBA 宏来自动插入多行数据。这种方法可以方便我们自定义需要插入的行数和插入位置。下面是编写 VBA 宏的步骤:
1、按下Alt + F11快捷键,打开 Excel 的 VBA 编辑器。
2、在 VBA 编辑器中,点击插入(Insert)-> 模块(Module)菜单,新建一个 VBA 模块。
3、在新建的 VBA 模块中,写入插入多行的代码。下面是插入多行数据的示例代码,可以根据需要自行输入插入行数:
代码如下:
vbscript
Sub 插入多行()
' 定义变量
Dim i As Integer
Dim hang As Integer
hang = InputBox("请输入插入行数", "行数", "20")
'从当前选择的行开始,批量插入多行数据
For i = 1 To hang '5
Selection.EntireRow.Insert '插入整行
Next i
End Sub
4、编写完成后,在 VBA 编辑器中按下F5即可运行该宏。
5、运行宏后,返回 Excel 表格,选择需要在哪一行下面插入多行数据,然后点开 Excel 的宏(Macro)列表,选择刚刚编写的宏即可批量插入多行数据。
参考来源
Excel 快速插入多行的方法|极客笔记 (deepinout.com)https://deepinout.com/excel/excel-tutorials/j_quick-methods-to-insert-multiple-rows-in-excel.html【VBA】 数据输入 Inputbox 基本语法 - 知乎 (zhihu.com)https://zhuanlan.zhihu.com/p/42568534
特此记录
anlog
2024年5月20日