请问各位大神 用什么办法可以快捷的一次性的清除掉单个单元格的颜色，如附件所示

jkjk123

请问用什么办法可以快捷的一次性的清除掉单个单元格的颜色，如附件所示    新人求助帮忙！ 谢谢哦！

丨隨風灬

1）不知道你要删除颜色的单元格是根据什么规则删除的，随心所欲？
2）如果是没有规则看着顺眼的就去掉颜色的话   按颜色筛选之后  定位 可见单元格  清除颜色
2）如果有规则的话，请说明

jkjk123

丨隨風灬 发表于 2015-7-31 12:24
1）不知道你要删除颜色的单元格是根据什么规则删除的，随心所欲？
2）如果是没有规则看着顺眼的就去掉颜色 ...

我是想去掉单个单元格的颜色，而留下连在一起的多个单元格颜色（不区分不同颜色）！ 谢谢！

jkjk123

没人帮我解决这问题了吗，求求啦！

jkjk123

Sub kkk()
For Each Rng In Selection
If Rng.Offset(-1, 0).Interior.Pattern < 0 And Rng.Offset(1, 0).Interior.Pattern < 0 Then
Rng.Interior.Pattern = xlNone
End If
Next Rng
End Sub