方法有点笨:
第一步:在旁边区域输入公式并拖动至和原区域一样,此时只显示出包含7的单元格,其他单元格为错误值,如下图:
第二步:按F5定位功能,定位条件为公式-错误,确定后会选中所有错误单元格
第三步:按del键删除,即实现删除不含包7的所有单元格
最后,剩余的属于包含公式,选择性粘帖为值就好了
选中需要编辑的区域,然后选择条件格式,突出显示包含7的单元格,然后再用筛选把突出显示的单元格整理到一起,再选定删除就行了
在原位置不行,可以在shee2用公式做,把问题作为内容(邮件主题一定要包含“excel”)、excel样表文件(请特别注意:要03版的(如果是03以后的,把文件“另存为”一下,类型框可以选择03的),把现状和目标效果表示出来)作为附件发来看下 yqch134@163.com
用VBA吧!应该可以实现的!
Sub del_No7()
For Each rang In Sheet1.Range("a3:d4")
If rang <> "" Then If Not (rang = 7 Or InStr(1, rang, 7) > 0) Then Range(rang.Address) = ""
Next
End Sub
A3:D4这个范围自己根据实际情况更改!