code for hiding rows-(coloured)
 

Hell friends,

I want to know whether it is possible to create a code which by invoking it
to run should hide the rows which are highlighted by a particular colour.
If so any one will help me by providing it.

code for hiding rows-(coloured)
 

Try this

Sub Test()
Dim rw As Range

For Each rw In ActiveSheet.UsedRange.Rows
If rw.Interior.ColorIndex = 34 Then
rw.Hidden = True
End If
Next rw

End Sub



--
HTH

Bob Phillips

"srinivasan" wrote in message
...
Hell friends,

I want to know whether it is possible to create a code which by invoking
it
to run should hide the rows which are highlighted by a particular
colour.
If so any one will help me by providing it.

code for hiding rows-(coloured)
 

Mr Bob,
Thanks a lot. But as I am not familiar to VBA how it will work? Any colour
to the cell background or font colour.If I change the colour is the code has
to be changed

code for hiding rows-(coloured)
 

We are talking cell colour here, testing the Colorindex.

Do you want to check both cell colour and font colour? If so, what colours?

--
HTH

Bob Phillips

"srinivasan" wrote in message
...

Mr Bob,
Thanks a lot. But as I am not familiar to VBA how it will work? Any colour
to the cell background or font colour.If I change the colour is the code
has
to be changed

code for hiding rows-(coloured)
 

Hello,

I want to use the cell colour with pale blue(not font colour). Expecting
your kind response.

code for hiding rows-(coloured)
 

Sub Test()
Dim rw As Range

For Each rw In ActiveSheet.UsedRange.Rows
If rw.Interior.ColorIndex = 37 Then 'Pale blue
rw.Hidden = True
End If
Next rw

End Sub

Go to the VB IDE (alt-F11), insert a code module (InsertModule), and paste
the code in.

Then in excel ToolsMacroMacros... and select Test and Run.

--
HTH

Bob Phillips

"srinivasan" wrote in message
...


Hello,

I want to use the cell colour with pale blue(not font colour). Expecting
your kind response.

code for hiding rows-(coloured)
 

Thank a lot Mr Bob! It works nice. But if I want to change the color what
should I do?

code for hiding rows-(coloured)
 

Hi Srinivasan,

You need to find the colorindex for a colour, and update it.

This simple code returns all the colorindex values as the row number

For i = 1 to 56
Cells(i,"A").Value = i
Cells(i,"B").Interior.Colorindex = i
Next i

--
HTH

Bob Phillips

"srinivasan" wrote in message
...


Thank a lot Mr Bob! It works nice. But if I want to change the color what
should I do?