One way

Sub merged()
For Each c In Selection
If (IsError(c.Value)) Then
MsgBox "Error at " & c.Address
End If
Next
End Sub


Mike

"avi" wrote:

Hello,

I look for a very fast code that will indicates the presence of at
least one #N/A, #DIV!....in a range the user select

Thanks a lot
Avi