高校问答实体店买茶叶的技巧:我要在EXCEL表格中插入行
来源：百度文库 编辑：高校问答 时间：2024/05/08 02:40:58
我现在有个表格有100多行(行1.2.3....126)现在我需要在每行的中间插入8行来增加数据,但一行一行的插入很麻烦,应该可以成批处理的,请问怎么操作,,谢谢大家
选择第二行第一个单元格
然后运行如下宏
Sub Macro1()
Dim i, j, d
d = 126 * 9
For i = 1 To d Step 9
ActiveCell.EntireRow.Select
For j = 0 To 7
Selection.Insert Shift:=xlDown
Next
ActiveCell.Offset(9, 0).Select
Next
End Sub
就是你要的结果
你选中你要插入的八行，然后在要插入的地方插入。就会新增八行了呀！
自定义宏，可以进行批处理。
就用键盘操作好了,贴一百多下也很快的.哈
你选中你要插入的八行，然后在要插入的地方插入。就会新增八行.同时选中多少行，就可以插入多少行。
假如你是要在A6单元格后插入8行,选中行标7-14,右键单击选择"插入"即可.