SyntaxFix
Write A Post
Hire A Developer
Questions
From the Help:
Set isect = Application.Intersect(Range("rg1"), Range("rg2")) If isect Is Nothing Then MsgBox "Ranges do not intersect" Else isect.Select End If