https://stackoverflow.com/questions/5183374/vba-test-if-cell-is-in-a-range
Set isect = Application.Intersect(Range("rg1"), Range("rg2"))
If isect Is Nothing Then
MsgBox "Ranges do not intersect"
Else
isect.Select
End If
Welcome to FreeSoftwareServers Confluence Wiki
Overview
Content Tools