Quote:
Originally Posted by Gord Dibben
For any one color............
EditFindFormatFormat....choose a color and OK find all.
CTRL + a to select all "found" items.
On menu bar FormatRowHide
If you have many colors to do you may want to use VBA instead.
Sub hide()
Dim rng1 As Range
Set rng1 = Range(Cells(, 1), Cells(Rows.Count, _
Cells(, 1).Column).End(xlUp))
For Each cell In rng1
If cell.Interior.ColorIndex < xlNone Then
cell.EntireRow.Hidden = True
End If
Next
End Sub
Gord Dibben MS Excel MVP
|
Thank you God... I mean thank you Gord
The VBA code works like a charm !
I'm really greatful to Mr. Dibben. Thanks again