Hi

If not intersect(Selection, myRange) is nothing then
'do something
end if

where myRange is your Range of Cells.
e.g. Set myRange = ActiveSheet.Range("A2:B6")

If you only want one cell selected then

If Selection.Count = 1 then
If not intersect(Selection, myRange) is nothing then
'do something
end If
End If

regards
Paul

On Feb 4, 3:04*pm, ranswert
wrote:
I need to write a procedure that will run only when a selected cell is within
a range of cells. *How do I identify if it is within a range?