Cell lies within range
Hi Kaval,
Try something like:
Sub Tester09()
Dim rng As Range
Dim rcell As Range
Set rng = Range("TEST")
Set rcell = Range("A2")
If Not Intersect(rcell, rng) Is Nothing Then
MsgBox rcell.Address(0, 0) & " lies in the named " _
& rng.Name.Name & " range"
Else
'It does not!
End If
End Sub
---
Regards,
Norman
"Kaval" wrote in message
...
I think I have seen an elegant way of determining if a particular cell lies
within a particular range. eg. does cell(x,y) lie inside range(a:b)
Any ideas?
Thanks, Kaval
|