Checking for all blank cells in a range orcolumn.
 

How do I check to see if all the cells in a column are blank so I can skip
several lines of code which run a "text to columns" procedure but get hung up
when the cells are all blank. It works fine when there is data in at least 1
cell.

Thanks
--
Mickey

Checking for all blank cells in a range orcolumn.
 

Hi Mikey,
this could meet your requirements:

If Application.CountA(Columns(1)) = 0 then Msgbox "First column is
empty"