i know this is pitiful, but I'm working without a helpfile...


1)Is there an easy way to see if the row is blank? What I'm doing below only checks the Active cell instead of the row.

2)If I am referencing the active cell, how do I activate the row so I can delete it?



If ActiveCell.Rows.Text = "" Then

Selection.Delete Shift:=xlUp
ConsEmptyRow = ConsEmptyRow + 1
else
'Do something else with it
end if

Thanks,
LauRa