dropping a range ref inside IsEmpty() before
I am sorry Greg, that's a misunderstanding. IsEmpty checks just the first cell of the range, therefore:
<pre><SPAN style="color:#00007F">Sub</SPAN> TestBlanks()
<SPAN style="color:#00007F">Dim</SPAN> cl <SPAN style="color:#00007F">As</SPAN> Range
<SPAN style="color:#007F00">'</SPAN>
<SPAN style="color:#007F00">' this will work</SPAN>
<SPAN style="color:#00007F">If</SPAN> [AND(ISBLANK(A1:A10))] <SPAN style="color:#00007F">Then</SPAN> MsgBox "All Empty"
<SPAN style="color:#007F00">'</SPAN>
<SPAN style="color:#007F00">' and this will not</SPAN>
<SPAN style="color:#00007F">Set</SPAN> cl = [A1:A10]
<SPAN style="color:#00007F">If</SPAN> IsEmpty(cl) <SPAN style="color:#00007F">Then</SPAN> MsgBox "All Empty"
<SPAN style="color:#007F00">'</SPAN>
<SPAN style="color:#007F00">' and this of course works</SPAN>
<SPAN style="color:#00007F">Set</SPAN> cl = [A1]
<SPAN style="color:#00007F">If</SPAN> IsEmpty(cl) <SPAN style="color:#00007F">Then</SPAN> MsgBox cl.Address & " Empty"
<SPAN style="color:#00007F">End</SPAN> <SPAN style="color:#00007F">Sub</SPAN></PRE>
Sorry for the misleading contribution
Best regards,
Martin