Evaluating a range
 

I would appreciate some help on evaluating a range
(Columns A:K). The problem is that there are several
different variable types within this range. How can I
code the program to say if all cells are blank, do "X".

I could look at each cell in each column for each row but
that doesn't seem to be efficient.

Thanks for the help.

Evaluating a range
 

Mike,

Try something like the following:

If Application.WorksheetFunction.CountA(Range("A:K")) = 0 Then
Debug.Print "All Blank"
Else
Debug.Print "Not all blank"
End If



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Mike" wrote in message
...
I would appreciate some help on evaluating a range
(Columns A:K). The problem is that there are several
different variable types within this range. How can I
code the program to say if all cells are blank, do "X".

I could look at each cell in each column for each row but
that doesn't seem to be efficient.

Thanks for the help.