先假设你现有知裂蠢记录不足10000条(比如实际为8343条),你要补足到10000条
(若是你在有中断的情况下,已经有10000条记录,那么补足中断,则肯定超过10000条,则补足后的总数是A列现有最大的那个数字,那么以下公式需要相应修改)
第一步:在A列后面插入一个新列,即B列(原BCDE……列右推到CDEF……列)
第二源早步:将A列的数据完整复制到B列
第三步:在B列的第一个空白单元格,输入公式:
=INDEX(ROW($1:$10000),SMALL(IF(COUNTIF($A$1:$A$8343,ROW($1:$10000)),"",ROW($1:$10000)),ROW(A1)),1)
输入公式后搭陪,不要直接按Enter键,而是按组合键Shift+Ctrl+Enter键,使得公式显示为(数组公式)
{=INDEX(ROW($1:$10000),SMALL(IF(COUNTIF($A$1:$A$8343,ROW($1:$10000)),"",ROW($1:$10000)),ROW(A1)),1)}
第四步:将该公式往下拖拽进行填充,直至出现“#NUM!”为止,然后删除“#NUM!”
第五步:对B列进行升序排序,然后删除B列 (原BCDE……列又回来了)
任意空白列把这列复制过去,图中为例子
第一个红嫌链物字数组公式(公式输好了crtl+shift+enter结束)
=INDEX(ROW($1:$50),SMALL(IF(COUNTIF($A$1:$A$12,ROW($1:$50)),""唤搜,ROW($1:$50)),ROW(A1)),1)
向下多填充一些,选中AB两列,以B列为主要关键字升序芹液排序
复制A到B列迅穗,然后输入:
=MIN(IF(COUNTIF(B$1:B7,ROW($1:$15)),16,ROW($1:$15)))
按CTRL+SHFIT+ENTER结束,向裤昌则下复制,然后对B列排序。
其中,ROW($1:$15)——1是A列的最小值,15是最大值。
请点击大图看动画演示
欢迎到我的百胡棚度空间阅读更多Excel文章http://hi.baidu.com/gouweicao78/home
只用if函数也胡桥能做到,只是有些笨,如果断号不太多的话可以,但断如果大于1,比如2、5中间缺两个,就得重复操作脊升了。具体操作如下:
在B2内输入函数
=IF(A2-A1=1,A2,"空")
自动筛选B列的“空”,再按住Ctrl键一行一行的选,再选接入行命令即可。
该办法的自我评价:
优点,容易理解,excel知识要求不高;
缺点,如果断号多,操作困裤野猛难,尤其是连续断号多的话更麻烦。
插入御御册多少空白行?只插一个还是以中断数字的个数插入镇宏?比如10到100是插一个空白行或者插90个空白行?给你一段VBA代码参考(这段代码是插入数字个数空白行的,如果不满足要求你可以简单修改拆携一下):
Sub RowInsert()
Dim rgRow As Range
Dim i As Integer
For i = 1 To 1000
Set rgRow = Cells(i, 1)
If rgRow <> i Then
rgRow.EntireRow.Insert , xlFormatFromLeftOrAbove
End If
Next
End Sub