Please read forum rules & wrap your VBA code - see links below for rules

If you do not understand the VBA code wrap instructions have a look at my last reply in this thread
http://www.excelforum.com/showthread.php?t=583950