在A列中的空白单元格后,将两行单元格添加到Excel电子表格中

时间:2014-07-25 19:44:07

标签: excel excel-vba vba

我正在使用一个包含许多行数据的电子表格,但是根据薪水等级高于我自己的人的指示,需要添加空白行。

基本上,我想在A列中没有任何信息的行下面添加两行空白单元格。 我试着写一个模块来做这件事,但我显然不够了解这一点。

任何帮助都将不胜感激。

1 个答案:

答案 0 :(得分:0)

如果这是你经常需要做的事情,我会写一个宏(不能帮助你。没有永远完成它们),但如果这只是一次性的,我就是d首先添加一列索引以维持排序。在它旁边,在要在下面插入空行的每行中获得1。假设这是B列。

=IF($A1="",1,0) 

在下一列(C)中,将值设为目前为止的1的数字。 (手工设置C1)

=IF($B2=0,$C1,$C1+1)

现在你需要一个列(D),它只有一个空白行的计数值(否则为0):

=IF($B1=0,0,$C1)

现在按D列对图表进行排序。这最终应该是底部的所有空白条目行。走到他们的尽头。看看你有多少。假设您有100个。现在在D列的下面,给出空白行数字1到100.在它下面再做一次。现在依靠D来度假。你现在应该有你的A条目行,后跟非A条目行,每行都有两个空白行。现在,添加一个新列(E)来检查排序索引列(称为J)。 (手动设置E1和E2)。

=IF($J3="",IF($J2="",$J1+0.1,$J2+0.1),$J3)

现在按照E列来处理所有内容,您应该在原始排序中拥有您想要的内容(加上一些现在可以丢弃的额外列)。