Thank you for the ideas.
But, she hangs up on

If rcel.Value 0 Then

Doesn't look much different then what I triied before.
Sounds simple I can't get it to work.

The active sheet save didn't work either. ?????

--
Message posted from http://www.ExcelForum.com