get新技能是需要付出行动的，即使看得再多也还是要动手试一试。今天图老师小编跟大家分享的是excel按筛选颜色的VBA代码，一起来学习了解下吧！
【 tulaoshi.com - Excel教程 】
在excel中，使用可视化的简单操作方法，是很难根据颜色来筛选的，因此，我们只能使用VBA代码来实现。
以下代码的功能是：除首行外，将当前单元格所在列数据与当前单元格不同颜色的行隐藏起来，数据首行为标题列。
如果你有其它的需求，请自行修改代码。
Sub FilterColor()
Dim UseRow, AC
（本文来源于图老师网站，更多请访问https://www.tulaoshi.com）UseRow = Cells.SpecialCells(xlCellTypeLastCell).Row
If ActiveCell.Row UseRow Then
MsgBox "超出范围，请选择有数据或有意思的单元格!", vbExclamation, "错误"
Else
AC = ActiveCell.Column
Cells.EntireRow.Hidden = False
For i = 2 To UseRow
If Cells(i, AC).Interior.ColorIndex ActiveCell.Interior.ColorIndex Then
Cells(i, AC).EntireRow.Hidden = True
End If
Next
End If
End Sub
（本文来源于图老师网站，更多请访问https://www.tulaoshi.com）来源:https://www.tulaoshi.com/n/20160219/1608927.html
看过《excel按筛选颜色的VBA代码》的人还看了以下文章 更多>>
