发布网友
共5个回答
热心网友
实现思路讲解。
使用excel中的IF和COUNTIF函数,筛选出含有某个关键词的行,然后排序、框选后,一次性删除。
下面以2014年公务员招考简章为例进行说明。
第一步:首先明确要筛选的关键词:我以“*学与行政学专业”为例,可报考“*学、法学类、文史类、文科类、不限专业”等几类,下面我们就通过筛选一下,包括这几个类别的专业。
第二步:编写函数
在当前数据区域的最后,找一空列。我们将在这一空列中标识出符合我们条件的列。=IF(OR(COUNTIF(L2,"***"),COUNTIF(L2,"*法学类*"),COUNTIF(L2,"*文*"),COUNTIF(L2,"*不限*"),COUNTIF(L2,"")),"符合","不符合")
注意关键词越少,则搜索的面越大。所以将第一步中的“*学”精简成“*”,这样*理论等专业也就可以包括在了筛选范围内。
符合筛选条件的该空列的单元格将填上“符合”,反之“不符合”
第三步:将该函数粘贴在空列的第一行,下拉填充到数据的最后一行。
按当前列排序,将不符合的删除掉,就剩下符合的了。其它*面貌等条件可以加到上面条件中一次筛选,也可以用自动筛选功能实现,就不赘述了。
热心网友
可以按颜色筛选
筛选出黑色字体(自动)
再按ctrl+g,设置定位条件为可见单元格,再删除
追问不好意思,我没有说清楚,文中的红色字体是我自己添加的,只是为了让大家更直观,但行数太多的话我逐个挑出来标红色太累了。请问能否通过自动寻找行数的位置来删除呢,如(K-1)*4+1(K=1、2、3、4……)?谢谢!追答
插入一列
公式
=IF(MOD(ROW(),4)=1,"",1)
下拉
选中那列,按CTRL+G,选定位条件
设置定位条件为公式-数字,点确定
在其中一个被选中的单元格上右键-删除-删除整行
效果如下
热心网友
选中第一列,ctrl+G,定位条件,空值,右键,删除,整行;
选中第一行,筛选(ALT+D+F+F)-按颜色筛选-你的就俩颜色(应该是选自动),这样红色的就被隐藏了;
选中第2行及以下的行,ctrl+G,定位条件,可见单元格,右键,删除;
把筛选取消掉就OK了追问不好意思,我没有说清楚,文中的红色字体是我自己添加的,只是为了让大家更直观,但行数太多的话我逐个挑出来标红色太累了。请问能否通过自动寻找行数的位置来删除呢,如(K-1)*4+1(K=1、2、3、4……)?谢谢!
追答在C1写一个1,选中C1:C4,往下拖,选中C列,定位,空值,右键,删除,整行
热心网友
如果数据全部按照这个规律进行排列,可采用先筛选再删除的方式。
使用VBA也可以,但是没必要。
筛选B列-空白-删除全部即可
热心网友
Sub Macro1()
'k 总行数32
'l 间隔行数4
k = 32
l = 4
For i = k To 1 Step -1
If Not (i = Int(i / 4) * 4 + 1) Then
Rows(i & ":" & i).Select
Selection.Delete Shift:=xlUp
End If
Next
End Sub