How do i check if the a named range is empty

[Luc]

I have a named range ("Risks").
How can i check if this named range contains no values.
If the range is totaly empty, then i have to show a message box and exit the
sub.


Thanxxxxx,

Luc

 

[Bob Phillips]

If Application.CountA(rng) = rng.Cells.Count Then

MsgBox "Is empty
End If

HTH

Bob

 

[Mike H]

Hi,

One way

If WorksheetFunction.CountA(Range("risks")) = 0 Then
MsgBox "Empty"
Else
MsgBox "Not Empty"
End If

Mike

 

[Luc]

Thanxxxx that did the job


If i hadn't you guys .....


Luc