This line

If wsmiss102.Range("b" & cnt) < "" Then _

should prevent any empty lines from being copied. Is says if the specified
range is not equal to null then ... do something. So the only cells it will
acknowledge are those with data in them.

"bpotter" wrote:

No that doesn't work. It collects all of the empty rows not the rows
that have values.