Shake,

My pleasure. I was just having another look at the code. There is
small howler (which you probably picked up).

If cnt *=*3 Then Exit sub should be If cnt* *3 Then Exit sub.


Davi

--
david
-----------------------------------------------------------------------
davidm's Profile: http://www.excelforum.com/member.php...fo&userid=2064
View this thread: http://www.excelforum.com/showthread.php?threadid=48306