Checking for all blank cells in a range orcolumn.

G

Guest

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
 
R

Roman

Hi Mikey,
this could meet your requirements:

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

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

VBA set thick borders around non empty cells in range 0
Concat a three column range into one cell Then Next... 2
Excel Concatenate with line breaks but ignore blank cells 3
Skipping empty cells for a Range object? 1
Fill in zeros within a specified range 9
Substituting zero values in blank cells 5
hiding blank rows 3
Concatenate a row that is selected and include blank cells 11

Top