This works, though it might not be the most elegant
solution:

Dim RangeName As String
RangeName = "Revenue"

If ActiveCell.Column = Range(RangeName).Column And
ActiveCell.Row = Range(RangeName).Row Then
MsgBox "is"
Else
MsgBox "isn't"
End If

HTH
Helen