本问题对数据排序即可完成排序并删除空白行。如图，先选择数据区域，再数据菜单——排序和筛选——排序，根据是否有标题行（需要在第选择区域的第1行），选择勾选或不勾选“有标题行”的对勾，有标题行选择按哪个标题排序，没标题行选择按哪列排序，排序选择“升序”（如需要也可选择降序），确定后，即完成排序，并把空白行排到最后面去了。
你这个有空行，排序完后就没空行了。这样不行。排序完也要有空行。
你要保留空行？那就加个辅助列，如图
C2=IF(A2>0,A2,C1+0.1)
下拉，然后，按辅助列排序即可。
点顶部的数据---排序---主关键字勾选“序号”---升序追问
序号是排上去了，隔行的数据没有同步跟上去。注意我发的图片，序号之间有隔行。隔行的后面有数据，序号自动排列上去了，隔行消失了。我要的是隔行同步一起排列好
追答你这特殊要求，我不是吹牛啊，我个人估计，公式是解决不了的。建议考虑用VBA解决。
另外我额外问一下，这些隔行的这些空行，是整行都是空的，还是说右侧你没截到图的上列中是有数据的？
右侧有数据我没载到图上
你看看这个图，你是不是要这个效果？
D180公式：
=IF(A180,SMALL(A$180:A$200,COUNT(A$180:A180)),"")
E180公式：
=IFERROR(VLOOKUP(D180,A$180:B$200,2,0),"")
对对，就是这样的·怎么做到的
追答公式不是发出来了吗，你也看到啦。再两条公式填上，然后下拉填充公式即可。
追问怎么填？
追答把这条公式填在D180单元格：
=IF(A180,SMALL(A$180:A$200,COUNT(A$180:A180)),"")
把这条公式填在E180单元格：
=IFERROR(VLOOKUP(D180,A$180:B$200,2,0),"")
然后选中D180和E180，同时下拉填充公式。
你要是实在不会的话，就戮我的头xiang图片看一看就能找到我了，呵呵。