excel里每5行增加插入一个空行。求公式。

Question

如图:

Answer 1

　　1、在数据区域右侧插入一个辅助列，如F列。在F列中选择与数据区域中第5行所对应的单元格F9，输入一个字母或数值，如“1”，然后选择F9:F12（共4行），双击或拖动填充柄向下填充。

　　注意如果是每隔N行插入一个空行，则需在辅助列中对应数据区域的第N+1行所在单元格输入数值，再选择该单元格及以下的N－1行（选择该单元格及以上的N－1行也可），即共选择了N行，向下填充。

　　Excel会自动每隔N－1行（本例为3）填充一个数值，如图。

　　2、保持填充后的选择状态，按F5键，打开“定位”对话框，单击“定位条件”，选择“常量”，单击“确定”。 这样会选中辅助列中所有已填充数值的单元格。

　　3、.插入空行。在Excel 2003中，单击菜单“插入→行”。在Excel 2007和Excel 2010中，选择“开始”选项卡，在“单元格”组中，单击“插入→插入工作表行”。Excel将在所有选定的单元格上方插入一个空行，即每隔4行插入一个空行。

　　4、删除辅助列，即可达到本次操作目标。

Answer 2

excel插入行的问题
1、EXCEL每隔几行插入一行，比如每隔5行插入一行，可以在后面的空列第二行输入=IF(MOD(ROW()-1,5),"",1)并向下填充,再筛选这一列的"1"项或非空白项,选定筛选结果,编辑--定位--定位条件--可见单元格---菜单--插入--行。
2、每隔多少行插入多少行，比如每隔10行插入10行，第一步按照每10插入一行先插入一行，在后面空列第二行输入=IF(MOD(ROW()-1,10),"",1)向下填充,按上面方法插入一行.然后点筛选--全部显示,对前有数据的任何一列筛选非空白项,选定筛选结果---编辑--定位可见单元格--插入---行.可是这时的结果却是每十行插入11行了.可以在空白列的第二行输入=IF(MOD(ROW(),21)=0,1,"")向下填充,筛选这一列非空白项,选定---编辑--定位可见单元格--编辑--删除行.

Answer 3

Sub 插入空行()
Dim xx As Integer
xx = Int([A65536].End(xlUp).Row / 5)
For I = 1 To xx
Rows(I * 5 + 1 + K).Insert
K = K + 1
Next I
End Sub本回答被提问者和网友采纳

Answer 4

没有这公式啊。
可以考虑用VBA

Answer 5

试试宏！

Answer 6

excel插入行的问题
1、EXCEL每隔几行插入一行，比如每隔5行插入一行，可以在后面的空列第二行输入=IF(MOD(ROW()-1,5),"",1)并向下填充,再筛选这一列的"1"项或非空白项,选定筛选结果,编辑--定位--定位条件--可见单元格---菜单--插入--行。
2、每隔多少行插入多少行，比如每隔10行插入10行，第一步按照每10插入一行先插入一行，在后面空列第二行输入=IF(MOD(ROW()-1,10),"",1)向下填充,按上面方法插入一行.然后点筛选--全部显示,对前有数据的任何一列筛选非空白项,选定筛选结果---编辑--定位可见单元格--插入---行.可是这时的结果却是每十行插入11行了.可以在空白列的第二行输入=IF(MOD(ROW(),21)=0,1,"")向下填充,筛选这一列非空白项,选定---编辑--定位可见单元格--编辑--删除行.

Answer 7

Sub 插入空行()
Dim xx As Integer
xx = Int([A65536].End(xlUp).Row / 5)
For I = 1 To xx
Rows(I * 5 + 1 + K).Insert
K = K + 1
Next I
End Sub本回答被提问者和网友采纳

Answer 8

没有这公式啊。
可以考虑用VBA

Answer 9

试试宏！