opps! i found the error!

it should have been For Each cellColour In Range("B5:BA100").. and no
For Each cell In Range("B5:BA100"

--
porki
-----------------------------------------------------------------------
porkie's Profile: http://www.excelforum.com/member.php...fo&userid=1455
View this thread: http://www.excelforum.com/showthread.php?threadid=26371