RT,我也知道只要右键选中然后删除就行了,但是我这个EXCEL有1500多行的数据,所有双行的都不要,就是第2 4 6 8……行,那怎么做到一下子删除呢?
PS:我要删除的是所有双数行并往上移,例如1000行最后就剩下500行了,并不是删除双数行的内容,并且我有A至F 六列 还有一千多行!
批量删除所有双数行的数据,步骤是:(如图)
1、选取A列,右击,“插入”,在A列前插入一辅助列。
2、在A2中输入1,选取A1:A2,向下拖至数据区域末一行。
3、同时按CTRL+G,打开“定位”,在“定位条件”中选择“常量”,确定。
4、在已选取的单元格上右击,“删除”、“整行”,确定。
温馨提示:答案为网友推荐,仅供参考
第1个回答 2010-03-04
有个很简单的方法
加一个辅助列
如Z列,Z1单元格输入“单双数”
在数据行的提一行(如数据从第2行开始)Z2单元格输入1、Z3单元格输入2
复制Z1:Z2,然后选定Z3至数据最末行对应的Z列单元格,粘贴。
选中标题行,点击“数据”菜单,自动筛选,在Z1的下拉菜单中选择出双行,删除就OK了。
回答补充:
恕我愚钝啊,不知道“删除双数行”和“不删除双数行内容”怎么并存啊~
加一个辅助列
如Z列,Z1单元格输入“单双数”
在数据行的提一行(如数据从第2行开始)Z2单元格输入1、Z3单元格输入2
复制Z1:Z2,然后选定Z3至数据最末行对应的Z列单元格,粘贴。
选中标题行,点击“数据”菜单,自动筛选,在Z1的下拉菜单中选择出双行,删除就OK了。
回答补充:
恕我愚钝啊,不知道“删除双数行”和“不删除双数行内容”怎么并存啊~
第2个回答 推荐于2017-11-23
建立辅助列。
在辅助列单数行输入1,在双数行输入2,将1、2刷黑,向下拉倒最后一行,然后对辅助列排序,将双数行删除。本回答被提问者采纳
在辅助列单数行输入1,在双数行输入2,将1、2刷黑,向下拉倒最后一行,然后对辅助列排序,将双数行删除。本回答被提问者采纳
第3个回答 2010-03-04
在后面空列输入=IF(MOD(ROW(),2),"",1)并向下填充.然后筛选这一列1项.选定后按DELETE键就行了.
第4个回答 2010-03-04
把下面这个放在一个VBE模块里面,然后把要删除数据的表激活
运行TEST宏就可以,2秒搞定
sub test()
dim a,i
a=activesheet.[a65536].end(xlup).row
if a mod 2<>0 then a=a-1
for i=a to 2 step -2
activesheet.rows(i).delete
next i
end sub
运行TEST宏就可以,2秒搞定
sub test()
dim a,i
a=activesheet.[a65536].end(xlup).row
if a mod 2<>0 then a=a-1
for i=a to 2 step -2
activesheet.rows(i).delete
next i
end sub