Range Names
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 |
Range Names
Hi Helen,
what are you after? Maybe, you'd have a look at "Intersect-Method" in VBE-Help. This works, though it might not be the most elegant solution: arno |
Range Names
Dim RangeName As String
RangeName = "Revenue" If Not Intersect(Activecell, Range(RangeName)) Is Nothing Then MsgBox "is" Else MsgBox "isn't" End If -- HTH RP "Helen Trim" wrote in message ... 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 |
All times are GMT +1. The time now is 12:21 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com