
在excel中怎么快速批量删除单元格背景颜色为红色的数据?
在excel中,A-G以下全部是数据,里面有单元格背景颜色红色和白色(系统默认色),如何把单元格背景为红色的数据删除呢?...
在excel中,A-G以下全部是数据,里面有单元格背景颜色红色和白色(系统默认色),如何把单元格背景为红色的数据删除呢?
展开
展开全部
直接替换就可以了。
编辑-替换-选项,查找内容的格式按钮-图案,选择红色。
替换为的格式按钮-图案,选择无颜色。确定-全部替换。
编辑-替换-选项,查找内容的格式按钮-图案,选择红色。
替换为的格式按钮-图案,选择无颜色。确定-全部替换。
追问
大哥,我红色区域还有内容了.什么也不填,能把内容去掉吗?
追答
那就先单元查找全部,在查找对话框里会显示出所有查找出来的单元格,选中它们,再单击全部替换,再关闭替换对话框,按键盘上的删除键。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
替换,打开选项,查找内容不填,格式选择你要删数据的单元格格式一样的,替换为空,如果连背景色一起去掉,把这个格式也改了,然后选全部替换就可以
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
函数处理很无力。
用vba吧
打开你的工作簿,按下
alt+F11
菜单,插入,模块
将下面代码复制到右边空白区
然后存盘退出
再打开文件,按照提示,你最终需要选择“启用宏”
然后alt+F8
找到批量删除,执行它
即可,代码中假设了数据是A1:G100,你根据实际自己修改一下
Sub 批量删除()
For Each rng In Range("A1:G100")
If rng.Interior.ColorIndex = 3 Then
rng.Delete Shift:=xlUp
End If
Next
End Sub
用vba吧
打开你的工作簿,按下
alt+F11
菜单,插入,模块
将下面代码复制到右边空白区
然后存盘退出
再打开文件,按照提示,你最终需要选择“启用宏”
然后alt+F8
找到批量删除,执行它
即可,代码中假设了数据是A1:G100,你根据实际自己修改一下
Sub 批量删除()
For Each rng In Range("A1:G100")
If rng.Interior.ColorIndex = 3 Then
rng.Delete Shift:=xlUp
End If
Next
End Sub
追问
存盘的时候是不是就把原来的名称换掉了.还有启用宏在那里选择?
追答
跟名称无关。
启用宏,你在打开工作表时,如果没有启用宏,,进入,工具,宏,安全性,调整为“中”,再重新打开一次。
刚才有朋友提醒了我,我的代码是把红底纹的单元格删除,下方单元格上移,不晓得你要的是什么效果,如果只是清除那个值,还保留那个单元格,代码修改为
Sub 批量删除()
For Each rng In Range("A1:G100")
If rng.Interior.ColorIndex = 3 Then
rng.value=“”
End If
Next
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用VBA来实现吧,具体的可以问我
追问
我还是一个新手呢.vba,怎么用呢?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询