如何把EXCEL表中做隔行删除

来源:百度知道 编辑:UC知道 时间:2024/05/20 20:53:30
我已在其它相关问题找到简便答案,就是:
在A1输入1,用填充柄向下复制,形成与行号相同的序列数。
在B1输入1,在B3输入2,鼠标选定B1:B4,用填充柄向下复制,形成隔行的序列数。
谢谢你们的回答

用宏可以简单实现,不知道你删除之后要留空,还是完全删除。
i=1
do while Cells(i, 1)<>""
if i mod 2 =1 then
Rows("7:7").Delete Shift:=xlUp'这个是完全删除
Rows("7:7").ClearContents‘仅仅清楚内容
end if
i = i + 1
loop
程序是删除奇数行,自己可以修改一下

在空白单元格如B1输入“=MOD(ROW(),2)”向下填充公式到最后一行,“数据”“筛选”“自动筛选”点下拉箭头选0或1(要删除的行)后选中行删除即可,要显示保留的内容点下拉箭头选全部

1、按住CTRL+左键选择然后删除;
2、用自动筛选选取相同的删除