EXCEL中隔行删除

答案:6 悬赏:40 手机版

解决时间 2021-03-29 07:18

提问者网友：謫仙
2021-03-29 02:41

EXCEL中隔行删除

最佳答案

五星知识达人网友：撞了怀
2021-03-29 04:00

找一个空白列，在里面输入
=mod(row(),2)
下拉填充

筛选，自动筛选，1是奇数行，0是偶数行，按照你的要求删除就可以了

全部回答

1楼网友：荒野風
2021-03-29 09:37

=IF(MOD(ROW(),2)=1,1,2)
筛选结果

2楼网友：千夜
2021-03-29 09:01

打开工程管理器，或同时按下ALT+F11
插入模块
粘贴代码后运行宏
Sub yy()
Dim n&
n = ActiveSheet.UsedRange.Rows.Count
Range("iv1:iv" & n) = "=if(mod(row(),2),1/0,"""")"
Range("iv1:iv" & n).SpecialCells(xlCellTypeFormulas, 16).EntireRow.Delete
[iv:iv].Clear
End Sub

3楼网友：北方的南先生
2021-03-29 07:25

两个办法
1）同二楼 mod函数，我也学习了，谢谢！
2）土办法
a）在第一列前插入一列空白列；
b）A1内写 A ; A2 内写 B
c）选中 A1,A2,下拉。
这样就得到重复 ABABABAB...一列数字
d）然后运用筛选，筛选出第一列只带有 A的数字，删除或者复制。

4楼网友：怀裏藏嬌
2021-03-29 05:47

在要删除的数据表里新插入列并且给所插入的列赋值奇数列为0，偶数列为1，筛选奇数或者偶数列然后删除就OK。

5楼网友：由着我着迷
2021-03-29 04:38

如果想删除偶数行：
a）在第一列前插入一列空白列；
b）在空白列第一行的单元格内输入任意内容（如mmm），空白列的第二行单元格不输入任何内容（即空值）；
c）选中空白列第一、第二两个单元格,下拉选中后的右下角的填充柄(注意此时这一新增列内的单元格处于选中状态，鼠标不要乱动)；
d）单击“编辑”菜单中的“定位”，再单击“定位条件”，选择“空值”，“确定”；
e)单击“编辑”菜单中的“删除”，选中“整行”，“确定”。

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息