ksnapp


somethings to double check


Is column B the correct column letter


What is the last row number with data in column B

is LR being set with the correct row number

try changing

If CELL.Value = "" Then

to

If trim(CELL.Value) = "" Then


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